Metrics for Equirectangular approximation to distance on a great circle

analyze706.0ms (4.2%)

Algorithm

1×

Search

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

Compiler

Compiled 38 to 18 computations (52.6% saved)

Precisions

Click to see histograms. Total time spent on operations: 333.0ms

ival-mult: 135.0ms (40.5% of total)

ival-sub: 58.0ms (17.4% of total)

ival-div: 38.0ms (11.4% of total)

ival-cos: 36.0ms (10.8% of total)

ival-add: 34.0ms (10.2% of total)

ival-sqrt: 27.0ms (8.1% of total)

const: 4.0ms (1.2% of total)

backward-pass: 2.0ms (0.6% of total)

sample2.2s (12.8%)

Results

922.0ms	6131×	0	valid
783.0ms	2125×	1	valid

Precisions

Click to see histograms. Total time spent on operations: 1.1s

ival-mult: 426.0ms (37.3% of total)

ival-cos: 176.0ms (15.4% of total)

ival-sub: 145.0ms (12.7% of total)

ival-add: 124.0ms (10.9% of total)

ival-div: 109.0ms (9.5% of total)

ival-sqrt: 100.0ms (8.8% of total)

backward-pass: 50.0ms (4.4% of total)

const: 12.0ms (1.1% of total)

Bogosity

preprocess272.0ms (1.6%)

Algorithm

2×	egg-herbie

Rules

2168×	`+-lowering-+.f64`
2168×	`+-lowering-+.f32`
1824×	`unsub-neg`
1560×	`-lowering-.f32`
1560×	`-lowering-.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	150	349
1	390	347
2	1038	343
3	5060	341
0	17	16
1	34	16
2	83	16
3	317	16
4	1522	16
5	5145	16
0	8138	16

Stop Event

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

Calls

Call 1

Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))

Outputs

(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))

(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))

Call 2

Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* (neg R) (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* R (sqrt (+ (* (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* R (sqrt (+ (* (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2)))) (* (- (neg phi1) phi2) (- (neg phi1) phi2)))))
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2)))) (* (- phi1 (neg phi2)) (- phi1 (neg phi2))))))
(neg (* (neg R) (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))))
(neg (* R (sqrt (+ (* (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))))
(neg (* R (sqrt (+ (* (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))))
(neg (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2)))) (* (- (neg phi1) phi2) (- (neg phi1) phi2))))))
(neg (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2)))) (* (- phi1 (neg phi2)) (- phi1 (neg phi2)))))))
(* lambda1 (sqrt (+ (* (* (- R lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- R lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* lambda2 (sqrt (+ (* (* (- lambda1 R) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 R) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* phi1 (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2)))) (* (- R phi2) (- R phi2)))))
(* phi2 (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 R) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 R) 2)))) (* (- phi1 R) (- phi1 R)))))
(* R (sqrt (+ (* (* (- lambda2 lambda1) (cos (/ (+ phi1 phi2) 2))) (* (- lambda2 lambda1) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* R (sqrt (+ (* (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2))) (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2)))) (* (- lambda1 phi2) (- lambda1 phi2)))))
(* R (sqrt (+ (* (* (- phi2 lambda2) (cos (/ (+ phi1 lambda1) 2))) (* (- phi2 lambda2) (cos (/ (+ phi1 lambda1) 2)))) (* (- phi1 lambda1) (- phi1 lambda1)))))
(* R (sqrt (+ (* (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2))) (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2)))) (* (- lambda2 phi2) (- lambda2 phi2)))))
(* R (sqrt (+ (* (* (- lambda1 phi2) (cos (/ (+ phi1 lambda2) 2))) (* (- lambda1 phi2) (cos (/ (+ phi1 lambda2) 2)))) (* (- phi1 lambda2) (- phi1 lambda2)))))
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi2 phi1) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi2 phi1) 2)))) (* (- phi2 phi1) (- phi2 phi1)))))

Outputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* R (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2)))
(* (neg R) (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2)) (neg R))
(* R (sqrt (+ (* (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* R (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (+ lambda1 lambda2))))
(* R (sqrt (+ (* (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* R (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (+ lambda1 lambda2))))
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2)))) (* (- (neg phi1) phi2) (- (neg phi1) phi2)))))
(* R (hypot (* (- lambda1 lambda2) (cos (/ (- phi2 phi1) 2))) (+ phi1 phi2)))
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2)))) (* (- phi1 (neg phi2)) (- phi1 (neg phi2))))))
(* R (hypot (* (- lambda1 lambda2) (cos (/ (- phi1 phi2) 2))) (+ phi1 phi2)))
(neg (* (neg R) (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))))
(* R (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2)))
(neg (* R (sqrt (+ (* (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- (neg lambda1) lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))))
(* (neg R) (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (+ lambda1 lambda2))))
(neg (* R (sqrt (+ (* (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 (neg lambda2)) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))))
(* (neg R) (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (+ lambda1 lambda2))))
(neg (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ (neg phi1) phi2) 2)))) (* (- (neg phi1) phi2) (- (neg phi1) phi2))))))
(* (neg R) (hypot (* (- lambda1 lambda2) (cos (/ (- phi2 phi1) 2))) (+ phi1 phi2)))
(neg (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 (neg phi2)) 2)))) (* (- phi1 (neg phi2)) (- phi1 (neg phi2)))))))
(* (neg R) (hypot (* (- lambda1 lambda2) (cos (/ (- phi1 phi2) 2))) (+ phi1 phi2)))
(* lambda1 (sqrt (+ (* (* (- R lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- R lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* lambda1 (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (- R lambda2))))
(* lambda2 (sqrt (+ (* (* (- lambda1 R) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 R) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* lambda2 (hypot (- phi1 phi2) (* (cos (/ (+ phi1 phi2) 2)) (- lambda1 R))))
(* phi1 (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2)))) (* (- R phi2) (- R phi2)))))
(* phi1 (hypot (* (- lambda1 lambda2) (cos (/ (+ R phi2) 2))) (- R phi2)))
(* phi2 (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 R) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 R) 2)))) (* (- phi1 R) (- phi1 R)))))
(* phi2 (hypot (* (- lambda1 lambda2) (cos (/ (+ R phi1) 2))) (- phi1 R)))
(* R (sqrt (+ (* (* (- lambda2 lambda1) (cos (/ (+ phi1 phi2) 2))) (* (- lambda2 lambda1) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(* R (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2)))
(* R (sqrt (+ (* (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2))) (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2)))) (* (- lambda1 phi2) (- lambda1 phi2)))))
(* R (hypot (* (- phi1 lambda2) (cos (/ (+ lambda1 phi2) 2))) (- lambda1 phi2)))
(* R (sqrt (+ (* (* (- phi2 lambda2) (cos (/ (+ phi1 lambda1) 2))) (* (- phi2 lambda2) (cos (/ (+ phi1 lambda1) 2)))) (* (- phi1 lambda1) (- phi1 lambda1)))))
(* R (hypot (* (- phi2 lambda2) (cos (/ (+ lambda1 phi1) 2))) (- phi1 lambda1)))
(* R (sqrt (+ (* (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2))) (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2)))) (* (- lambda2 phi2) (- lambda2 phi2)))))
(* R (hypot (- phi2 lambda2) (* (- lambda1 phi1) (cos (/ (+ lambda2 phi2) 2)))))
(* R (sqrt (+ (* (* (- lambda1 phi2) (cos (/ (+ phi1 lambda2) 2))) (* (- lambda1 phi2) (cos (/ (+ phi1 lambda2) 2)))) (* (- phi1 lambda2) (- phi1 lambda2)))))
(* R (hypot (- phi1 lambda2) (* (- lambda1 phi2) (cos (/ (+ lambda2 phi1) 2)))))
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi2 phi1) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi2 phi1) 2)))) (* (- phi2 phi1) (- phi2 phi1)))))
(* R (hypot (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (- phi1 phi2)))

Symmetry

(negabs R)

(sort lambda1 lambda2)

(sort phi1 phi2)

explain595.0ms (3.5%)

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
175	0	-	-	`(sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))`
77	111	(4.1935082419660546e+154 -7.59611351260603e+101 6.978747003054952e+170 1.2481276415886276e-24 1.115885570449875e+104)	-	`(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))`
0	0	-	-	`(-.f64 phi1 phi2)`
0	0	-	-	`(/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))`
0	0	-	-	`(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))`
0	0	-	-	`#s(literal 2 binary64)`
0	0	-	-	`(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))`
0	0	-	-	`phi1`
0	0	-	-	`lambda1`
0	0	-	-	`(*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))`
0	0	-	-	`R`
0	0	-	-	`(-.f64 lambda1 lambda2)`
0	0	-	-	`(+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))`
0	0	-	-	`phi2`
0	0	-	-	`(+.f64 phi1 phi2)`
0	0	-	-	`lambda2`
0	0	-	-	`(.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))`

Results

435.0ms	350×	1	valid
25.0ms	162×	0	valid

Compiler

Compiled 359 to 53 computations (85.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 380.0ms

ival-sqrt: 284.0ms (74.8% of total)

ival-mult: 33.0ms (8.7% of total)

ival-cos: 23.0ms (6.1% of total)

ival-sub: 13.0ms (3.4% of total)

backward-pass: 10.0ms (2.6% of total)

ival-add: 9.0ms (2.4% of total)

ival-div: 6.0ms (1.6% of total)

const: 1.0ms (0.3% of total)

eval0.0ms (0%)

Compiler: Compiled 21 to 14 computations (33.3% saved)

prune1.0ms (0%)

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	95.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))

Compiler

Compiled 21 to 14 computations (33.3% saved)

simplify177.0ms (1%)

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

New	Metric	Program
✓	cost-diff	(-.f64 lambda1 lambda2)
✓	cost-diff	(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓	cost-diff	(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
✓	cost-diff	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))

Rules

2168×	`+-lowering-+.f64`
2168×	`+-lowering-+.f32`
1824×	`unsub-neg`
1560×	`-lowering-.f32`
1560×	`-lowering-.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	66
1	34	66
2	83	66
3	317	66
4	1522	66
5	5145	66
0	8138	66

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
(- lambda1 lambda2)
lambda1
lambda2
(cos (/ (+ phi1 phi2) 2))
(/ (+ phi1 phi2) 2)
(+ phi1 phi2)
phi1
phi2
2
(- phi1 phi2)

Outputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos (/ (+ phi1 phi2) 2))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
(/ (+ phi1 phi2) 2)
(/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
2
#s(literal 2 binary64)
(- phi1 phi2)
(-.f64 phi1 phi2)

localize153.0ms (0.9%)

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
✓	accuracy	99.9%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
✓	accuracy	99.7%	(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓	accuracy	74.5%	(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))

Results

118.0ms	176×	1	valid
12.0ms	80×	0	valid

Compiler

Compiled 72 to 15 computations (79.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 75.0ms

ival-sub: 21.0ms (28.1% of total)

compiled-spec: 15.0ms (20% of total)

ival-mult: 13.0ms (17.4% of total)

ival-cos: 9.0ms (12% of total)

backward-pass: 6.0ms (8% of total)

ival-add: 4.0ms (5.3% of total)

ival-div: 3.0ms (4% of total)

ival-sqrt: 3.0ms (4% of total)

const: 0.0ms (0% of total)

series55.0ms (0.3%)

Counts

5 → 204

Calls

Call 1

Inputs
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))>
#<alt (- lambda1 lambda2)>
#<alt (cos (/ (+ phi1 phi2) 2))>

Outputs
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))>
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))>
#<alt (* -1 (* R phi2))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))>
#<alt (* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt phi2>
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (* -1 phi2)>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))>
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))>
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (cos (* 1/2 phi2))>
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>

Calls

51 calls:

Time	Variable		Point	Expression
19.0ms	phi1	@	0	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
3.0ms	R	@	0	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
3.0ms	lambda2	@	-inf	(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
2.0ms	phi2	@	0	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
2.0ms	lambda1	@	0	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))

rewrite436.0ms (2.6%)

Algorithm

1×	batch-egg-rewrite

Rules

4008×	`-lowering-.f32`
4008×	`-lowering-.f64`
2684×	`/-lowering-/.f32`
2684×	`/-lowering-/.f64`
2520×	`+-lowering-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	49
1	88	49
2	768	49
0	8433	49

Stop Event

1×	iter limit
1×	node limit

Counts

5 → 105

Calls

Call 1

Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
(- lambda1 lambda2)
(cos (/ (+ phi1 phi2) 2))

Outputs
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)) R)
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))))))) (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))))))))
(/.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 6 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))))))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))))))) #s(literal 1/2 binary64)))
(.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))))))))))
(.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))))))))))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(.f64 (pow.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1))
(+.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)))
(fma.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (*.f64 lambda2 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1)) (-.f64 (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (+.f64 (pow.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1)) (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) (-.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 (-.f64 (.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))
(.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(+.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (neg.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (neg.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(-.f64 lambda1 lambda2)
(-.f64 #s(literal 0 binary64) (-.f64 lambda2 lambda1))
(-.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2)
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(neg.f64 (/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))))
(neg.f64 (/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 lambda2 (.f64 lambda2 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (+.f64 (.f64 lambda2 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))) (.f64 lambda1 (.f64 lambda1 lambda1))) (+.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (+.f64 (.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (+.f64 (.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))) (.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (.f64 (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (+.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)))))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))

simplify412.0ms (2.4%)

Algorithm

1×	egg-herbie

Rules

7318×	`-lowering-.f32`
7318×	`-lowering-.f64`
3936×	`+-lowering-+.f64`
3936×	`+-lowering-+.f32`
1824×	`fma-lowering-fma.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	745	6936
1	2615	6244
0	8481	6244

Stop Event

1×	iter limit
1×	node limit

Counts

204 → 204

Calls

Call 1

Inputs
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))

Outputs
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (*.f64 lambda1 R)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (+.f64 (.f64 lambda1 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))) #s(literal 3 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))) lambda1)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 R (.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 lambda1 (+.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) R))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda1 lambda1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 R)) (.f64 lambda1 (.f64 lambda1 lambda1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) R)) (.f64 lambda1 lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) R))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 lambda1 (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) lambda1)) lambda1)) #s(literal -1 binary64)))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda1))) (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (*.f64 lambda2 R)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (+.f64 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) lambda1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))) lambda2)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 R (.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda1))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(.f64 lambda2 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 lambda2 (+.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) lambda2)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) R))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda2 lambda2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 R)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) R)) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) R))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 R phi1)) #s(literal 1/2 binary64))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (+.f64 (.f64 phi1 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))))) (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) phi1)))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (.f64 phi1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (.f64 (.f64 R (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (+.f64 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/6 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2))))))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (.f64 R phi1)) (.f64 R (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))))) phi1)))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R #s(literal 1/2 binary64))) (.f64 phi1 phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (/.f64 (.f64 phi2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) #s(literal -1/2 binary64))))) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (-.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (.f64 phi2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1)))) phi1)) phi1)))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (.f64 phi2 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 1/2 binary64))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (.f64 phi2 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) phi2)))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 phi2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (.f64 (.f64 R phi2) (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/6 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 R (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))) phi2)))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(.f64 phi2 (+.f64 R (-.f64 (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R #s(literal 1/2 binary64))) (.f64 phi2 phi2)) (/.f64 (.f64 R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(.f64 phi2 (+.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 phi1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi2 phi2)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))) (/.f64 (.f64 R phi1) phi2))))
(* -1 (* R phi2))
(-.f64 #s(literal 0 binary64) (*.f64 R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) phi2)))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (.f64 phi1 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)))) phi2)) phi2)))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2)) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 lambda1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2)) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))))))) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))) #s(literal 3 binary64)))) (.f64 (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))) #s(literal 1/2 binary64)))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) lambda2)) (.f64 lambda1 (.f64 lambda1 lambda1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1)) (neg.f64 lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 lambda2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))))))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) #s(literal 3 binary64)))) (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (.f64 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) lambda1)) #s(literal 1/2 binary64)))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda2 lambda2))) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 lambda2 (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (.f64 (.f64 phi1 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) #s(literal 1/2 binary64))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (+.f64 (.f64 phi1 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))))) (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) phi1)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2))) (.f64 phi1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 1/2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2)))) (+.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2))))) (.f64 phi1 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/6 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (.f64 phi2 phi2))))))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))))) phi1)))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)) #s(literal 1/2 binary64)))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 phi2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) #s(literal -1/2 binary64)))) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (.f64 phi2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))) phi1)) phi1)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (.f64 phi2 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) phi2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 phi2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 1/2 binary64))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 phi2 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/6 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi2 phi2)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(.f64 phi2 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) #s(literal -1 binary64)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (.f64 phi1 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2))) phi2)) phi2)))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 lambda2 (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 lambda2 (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 lambda2 (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/2 binary64) phi1)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/8 binary64) phi1)))))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64))) (.f64 (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 #s(literal 1/48 binary64))))))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/8 binary64) phi2)))))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64))) (.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) phi2))))))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 #s(literal -1/2 binary64))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 #s(literal -1/8 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 #s(literal 1/48 binary64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/8 binary64) phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal 1/48 binary64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))

eval51.0ms (0.3%)

Compiler: Compiled 12108 to 1238 computations (89.8% saved)

prune94.0ms (0.6%)

Pruning

26 alts after pruning (26 fresh and 0 done)

	Pruned	Kept	Total
New	283	26	309
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	284	26	310

Accuracy

96.0%

Counts

310 → 26

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	22.5%	(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
	55.0%	(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
	29.2%	(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
	36.5%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)) (neg.f64 lambda1))
	17.8%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
	10.0%	(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
	21.7%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
	10.4%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
	51.9%	(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
	16.3%	(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)))
	83.9%	(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
	82.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
	72.2%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 #s(literal -1/8 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2)))
▶	83.9%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
	73.6%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/8 binary64) phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
	72.9%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal 1/48 binary64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
	89.6%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
▶	91.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
	35.5%	(.f64 R (hypot.f64 (exp.f64 (.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64))) (-.f64 phi1 phi2)))
	10.0%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
	22.5%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
▶	21.7%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
	10.4%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
	51.7%	(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
	49.7%	(.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
▶	31.8%	(*.f64 R phi2)

Compiler

Compiled 1144 to 744 computations (35% saved)

simplify221.0ms (1.3%)

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

New	Metric	Program
✓	cost-diff	(-.f64 lambda1 lambda2)
✓	cost-diff	(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
✓	cost-diff	(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))
✓	cost-diff	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
✓	cost-diff	(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓	cost-diff	(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓	cost-diff	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
✓	cost-diff	(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
✓	cost-diff	(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓	cost-diff	(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓	cost-diff	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)
✓	cost-diff	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
✓	cost-diff	(*.f64 R phi2)
✓	cost-diff	(-.f64 lambda1 lambda2)
✓	cost-diff	(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
✓	cost-diff	(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))
✓	cost-diff	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))

Rules

3018×	`+-lowering-+.f64`
3018×	`+-lowering-+.f32`
2938×	`-lowering-.f32`
2938×	`-lowering-.f64`
1828×	`sum4-define`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	36	248
1	95	244
2	277	244
3	1370	244
0	8102	244

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(- lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(- phi1 phi2)
phi2
(* R phi2)
R
phi2
(* R (* (cos (* 1/2 (+ phi1 phi2))) lambda2))
R
(* (cos (* 1/2 (+ phi1 phi2))) lambda2)
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
1/2
(+ phi1 phi2)
phi1
phi2
lambda2
(- 0 (* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1)))
0
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1))
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
1/2
(+ phi1 phi2)
phi1
phi2
(* R lambda1)
R
lambda1
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))
(- lambda1 lambda2)
lambda1
lambda2
(+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(* (sin (* 1/2 phi1)) (* phi2 -1/2))
(sin (* 1/2 phi1))
(* phi2 -1/2)
phi2
-1/2
(- phi1 phi2)

Outputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(- phi1 phi2)
(-.f64 phi1 phi2)
phi2
(* R phi2)
(*.f64 R phi2)
R
phi2
(* R (* (cos (* 1/2 (+ phi1 phi2))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
R
(* (cos (* 1/2 (+ phi1 phi2))) lambda2)
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
lambda2
(- 0 (* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)))
0
#s(literal 0 binary64)
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
(* R lambda1)
(*.f64 R lambda1)
R
lambda1
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))))
(.f64 R (hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(* (sin (* 1/2 phi1)) (* phi2 -1/2))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* phi2 -1/2)
(*.f64 phi2 #s(literal -1/2 binary64))
phi2
-1/2
#s(literal -1/2 binary64)
(- phi1 phi2)
(-.f64 phi1 phi2)

localize393.0ms (2.3%)

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))
✓	accuracy	99.9%	(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))
✓	accuracy	99.8%	(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
✓	accuracy	96.0%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
✓	accuracy	100.0%	(*.f64 R lambda1)
✓	accuracy	100.0%	(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓	accuracy	99.8%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
✓	accuracy	74.5%	(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓	accuracy	100.0%	(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓	accuracy	99.8%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
✓	accuracy	99.7%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)
✓	accuracy	74.5%	(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓	accuracy	100.0%	(*.f64 R phi2)
✓	accuracy	100.0%	(*.f64 #s(literal 1/2 binary64) phi1)
✓	accuracy	100.0%	(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
✓	accuracy	99.9%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
✓	accuracy	99.7%	(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))

Results

240.0ms	178×	1	valid
48.0ms	78×	0	valid

Compiler

Compiled 255 to 32 computations (87.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 240.0ms

ival-mult: 93.0ms (38.7% of total)

compiled-spec: 50.0ms (20.8% of total)

ival-cos: 37.0ms (15.4% of total)

ival-sub: 19.0ms (7.9% of total)

backward-pass: 13.0ms (5.4% of total)

ival-sin: 11.0ms (4.6% of total)

ival-add: 8.0ms (3.3% of total)

ival-sqrt: 7.0ms (2.9% of total)

const: 1.0ms (0.4% of total)

series164.0ms (1%)

Counts

19 → 672

Calls

Call 1

Inputs
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (* (- lambda1 lambda2) (cos (* 1/2 phi1)))>
#<alt (- lambda1 lambda2)>
#<alt (* R phi2)>
#<alt (* R (* (cos (* 1/2 (+ phi1 phi2))) lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) lambda2)>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (* 1/2 (+ phi1 phi2))>
#<alt (- 0 (* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1)))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1))>
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))>
#<alt (cos (* 1/2 phi1))>
#<alt (* 1/2 phi1)>
#<alt (* R lambda1)>
#<alt (* (sin (* 1/2 phi1)) (* phi2 -1/2))>
#<alt (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))>

Outputs
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1)))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))>
#<alt (* -1 (* R phi2))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda1)) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (cos (* 1/2 phi1)))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda2)) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))>
#<alt (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))))))))>
#<alt phi2>
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (* -1 phi2)>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (- lambda1 lambda2)>
#<alt (- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))>
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda2 (cos (* 1/2 phi2)))>
#<alt (+ (* -1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* -1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))>
#<alt (+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi2)))) (* 1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda2 (cos (* 1/2 phi1)))>
#<alt (+ (* -1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1))))>
#<alt (+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* -1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))>
#<alt (+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi1)))) (* 1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (cos (* 1/2 phi2))>
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (* 1/2 phi2)>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (* 1/2 phi1)>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* 1/2 phi1)>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* 1/2 phi1)>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (* 1/2 phi2)>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* 1/2 phi2)>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (- (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (- (* phi1 (- (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))) (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (- (* phi1 (- (* phi1 (- (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi2))))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))) (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (- (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (- (* phi2 (- (* phi2 (- (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (+ (* R (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))))))>
#<alt (+ (* R (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))>
#<alt (* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))>
#<alt (* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))>
#<alt (* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))>
#<alt (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))>
#<alt (* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (- lambda1 lambda2)>
#<alt (- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)>
#<alt (- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)>
#<alt (- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* -1/4 (* phi1 phi2))>
#<alt (* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))>
#<alt (* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))>
#<alt (* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt 1>
#<alt (+ 1 (* -1/4 (* phi1 phi2)))>
#<alt (+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))>
#<alt (+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>

Calls

168 calls:

Time	Variable		Point	Expression
20.0ms	phi1	@	0	(* (cos (* 1/2 (+ phi1 phi2))) lambda2)
17.0ms	phi1	@	inf	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))
15.0ms	phi2	@	0	(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))))
6.0ms	phi1	@	-inf	(* R (* (cos (* 1/2 (+ phi1 phi2))) lambda2))
3.0ms	phi1	@	0	(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))

rewrite435.0ms (2.6%)

Algorithm

1×	batch-egg-rewrite

Rules

3372×	`-lowering-.f32`
3372×	`-lowering-.f64`
2470×	`/-lowering-/.f32`
2470×	`/-lowering-/.f64`
2010×	`fma-lowering-fma.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	36	182
1	175	178
2	1606	178
0	8841	178

Stop Event

1×	iter limit
1×	node limit

Counts

19 → 322

Calls

Call 1

Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(- lambda1 lambda2)
(* R phi2)
(* R (* (cos (* 1/2 (+ phi1 phi2))) lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) lambda2)
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(- 0 (* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1)))
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1))
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2))))
(cos (* 1/2 phi1))
(* 1/2 phi1)
(* R lambda1)
(* (sin (* 1/2 phi1)) (* phi2 -1/2))
(+ (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (* phi2 -1/2)))

Outputs
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)) R)
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(sqrt.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))))))))
(/.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (-.f64 lambda1 lambda2) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)))))) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 6 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 6 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (neg.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))))))) #s(literal 1/2 binary64)))
(.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)))))))))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(.f64 (pow.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64)))
(fma.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 (+.f64 lambda1 lambda2)))
(pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))
(.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (neg.f64 (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))))
(/.f64 (-.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 lambda2 (.f64 lambda2 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (neg.f64 (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))) (neg.f64 (neg.f64 (+.f64 lambda1 lambda2))))
(pow.f64 (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) #s(literal -1 binary64))
(.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 R phi2)
(*.f64 phi2 R)
(.f64 R (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(.f64 lambda2 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda2 R))
(.f64 (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) R)
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)
(+.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi2))
(+.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 #s(literal 1/2 binary64) phi2 (*.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 phi2 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))
(/.f64 (+.f64 (.f64 (.f64 phi1 (.f64 phi1 phi1)) #s(literal 1/8 binary64)) (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi2)))
(/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2))
(/.f64 (.f64 (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) #s(literal 1/2 binary64)) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (.f64 (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 phi1 phi2))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 phi1 (.f64 phi1 phi1)) #s(literal 1/8 binary64)) (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 (-.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))))) (neg.f64 (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2)))) (neg.f64 (-.f64 phi1 phi2)))
(/.f64 (neg.f64 (.f64 (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) (neg.f64 (-.f64 phi1 phi2)))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))))
(+.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (.f64 R lambda1)) #s(literal 0 binary64))
(fma.f64 (.f64 R lambda1) (-.f64 #s(literal 0 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 R lambda1) #s(literal 0 binary64))
(fma.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) #s(literal 0 binary64))
(fma.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 0 binary64))
(fma.f64 (neg.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda1 #s(literal 0 binary64))
(fma.f64 (.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) R) lambda1 #s(literal 0 binary64))
(fma.f64 (.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) R #s(literal 0 binary64))
(neg.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))) (.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64)))) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 4 binary64)))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)))))
(pow.f64 (/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))) #s(literal -1 binary64))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 R lambda1)))
(.f64 (.f64 R lambda1) (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (*.f64 R lambda1)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))) (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))))
(.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 R lambda1))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(.f64 #s(literal -1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (neg.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda1)
(.f64 (.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) R) lambda1)
(.f64 (.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) R)
(+.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) #s(literal 0 binary64))
(fma.f64 R (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64))
(fma.f64 lambda1 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1) #s(literal 0 binary64))
(fma.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 0 binary64))
(fma.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1 #s(literal 0 binary64))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) R #s(literal 0 binary64))
(/.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))) (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1)))))
(.f64 R (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(.f64 lambda1 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) R)
(.f64 R (hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))))
(.f64 (hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) R)
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))
(/.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(/.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 6 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 6 binary64))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (hypot.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(.f64 (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) lambda1) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(fma.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) lambda1 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (-.f64 lambda1 lambda2)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (+.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))))
(/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))))
(/.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (-.f64 lambda1 lambda2)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))))) (neg.f64 (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (.f64 (+.f64 lambda1 lambda2) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))))) (neg.f64 (.f64 (+.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (neg.f64 (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))) (neg.f64 (.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (neg.f64 (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))) (neg.f64 (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (-.f64 (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 lambda1 lambda2))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 lambda1 lambda2))
(.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
(*.f64 R lambda1)
(*.f64 lambda1 R)
(.f64 phi2 (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/2 binary64))
(.f64 (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)) phi2)
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))
(+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))))
(fma.f64 phi2 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)) phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))) (pow.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 2 binary64)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))))) (neg.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))

simplify592.0ms (3.5%)

Algorithm

1×	egg-herbie

Rules

7762×	`-lowering-.f32`
7762×	`-lowering-.f64`
2882×	`+-lowering-+.f64`
2882×	`+-lowering-+.f32`
1748×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1539	17438
1	5541	17011
0	8264	17011

Stop Event

1×	iter limit
1×	node limit

Counts

672 → 672

Calls

Call 1

Inputs
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (cos (* 1/2 phi1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1)))))))))
(* -1 (* lambda1 (cos (* 1/2 phi1))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda1)) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (cos (* 1/2 phi1)))
(* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1))))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1)))))))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda2)) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(* lambda1 (cos (* 1/2 phi1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (cos (* 1/2 phi1)))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (cos (* 1/2 phi1)))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(- lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda2 (cos (* 1/2 phi2)))
(+ (* -1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2))))
(+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* -1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))
(+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi2)))) (* 1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda2 (cos (* 1/2 phi1)))
(+ (* -1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1))))
(+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* -1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))
(+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi1)))) (* 1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(* 1/2 phi2)
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(* 1/2 phi2)
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* 1/2 phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(- (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda1 (cos (* 1/2 phi2)))))
(- (* phi1 (- (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))) (* R (* lambda1 (cos (* 1/2 phi2)))))
(- (* phi1 (- (* phi1 (- (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi2))))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))) (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(- (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(- (* phi2 (- (* phi2 (- (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda1 (cos (* 1/2 phi2)))))
(+ (* R (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))))))
(+ (* R (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))
(+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))
(* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))
(* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(- lambda1 lambda2)
(- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
1
(+ 1 (* -1/8 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* -1/4 (* phi1 phi2))
(* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
1
(+ 1 (* -1/4 (* phi1 phi2)))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))

Outputs
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (.f64 R lambda1) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))) #s(literal 3 binary64))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))
(.f64 lambda1 (-.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 lambda1 lambda1)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))
(.f64 lambda1 (-.f64 (+.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 lambda1 lambda1)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (/.f64 (.f64 R lambda2) lambda1) (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1))))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) lambda1)) (neg.f64 lambda1))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda2 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 lambda1 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) #s(literal 3 binary64))))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1)))))
(.f64 lambda2 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))
(.f64 lambda2 (-.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 lambda2 lambda2)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))
(.f64 lambda2 (-.f64 (+.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 lambda2 lambda2)))) (.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 (.f64 lambda2 lambda2))))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(-.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (.f64 (.f64 R (.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (.f64 phi1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 (.f64 R phi1) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (*.f64 R phi2)))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (.f64 phi1 (-.f64 (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 (.f64 (.f64 phi1 phi2) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 R phi2)))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(.f64 phi1 (+.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 R phi2) phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))) (/.f64 (.f64 R phi2) phi1))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (.f64 R phi2) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 (.f64 R (.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 phi2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 (.f64 R phi2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))) (.f64 (.f64 R phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 phi2 (-.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 (.f64 (.f64 phi1 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) #s(literal 3 binary64)))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))))) (.f64 (.f64 R phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) R) phi2) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(.f64 phi2 (+.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 R phi1) phi2) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))))
(* -1 (* R phi2))
(-.f64 #s(literal 0 binary64) (*.f64 R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi1) (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (.f64 (.f64 R phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))) (.f64 (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))) #s(literal 3 binary64)))))))) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1))))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 lambda1 lambda1))) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1)))))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 lambda1 (.f64 lambda1 lambda1)))) (/.f64 (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* lambda1 (cos (* 1/2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda1)) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda2 (.f64 (/.f64 (-.f64 phi1 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 phi1 phi2) lambda1))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) lambda1)) (neg.f64 lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda1)))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))) (.f64 lambda1 (.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) #s(literal 3 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda1)))))
(* lambda2 (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2)
(* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))
(.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1))))))))
(.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 lambda2 lambda2))) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1)))))))))
(.f64 lambda2 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda1 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda2 lambda2)))))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda2)) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda1 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 (-.f64 lambda1 lambda2) phi2)
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(-.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (.f64 (.f64 phi1 phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (.f64 phi1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))) (.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (.f64 phi1 (-.f64 (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))) (.f64 (.f64 (.f64 phi1 phi2) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))))) (.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 phi2 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (/.f64 phi2 phi1))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1)) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi2) phi1))) phi1)) phi1)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) (.f64 (.f64 phi1 phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) (.f64 phi2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))) (.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) (.f64 phi2 (-.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))) (.f64 (.f64 (.f64 phi1 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) #s(literal 3 binary64)))))))) (.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 phi1 phi2) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)) phi2)))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 (.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64)) (-.f64 lambda1 lambda2)) lambda2))
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/384 binary64)) (-.f64 lambda1 lambda2)))) lambda2))
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 (.f64 phi1 phi1) #s(literal -1/46080 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/384 binary64)))))) lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (neg.f64 lambda1))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal -1/8 binary64) R) (.f64 (.f64 lambda2 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal 1/48 binary64) R) (.f64 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 lambda2 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal -1/8 binary64) R) (.f64 (.f64 lambda2 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) R) (.f64 (.f64 lambda2 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 phi2)))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2))))
(+.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* -1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2))))))))
(+.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda2 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* lambda2 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi2)))) (* 1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))))))
(+.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/48 binary64)))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2)
(+ (* -1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda2 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* -1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda2 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* lambda2 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda2 (cos (* 1/2 phi1)))) (* 1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda2 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (.f64 phi1 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (.f64 phi2 #s(literal 1/48 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1)) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1)) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1)) #s(literal -1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda1 (cos (* 1/2 phi2)))))
(-.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(- (* phi1 (- (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))) (* R (* lambda1 (cos (* 1/2 phi2)))))
(-.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/8 binary64) R) (.f64 (.f64 lambda1 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* phi1 (- (* phi1 (- (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi2))))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))) (* R (* lambda1 (cos (* 1/2 phi2)))))
(-.f64 (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (.f64 (.f64 #s(literal -1/48 binary64) R) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(- (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/8 binary64) R) (.f64 (.f64 lambda1 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(- (* phi2 (- (* phi2 (- (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/48 binary64) R) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/8 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(.f64 (neg.f64 (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda1 (cos (* 1/2 phi2)))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* R (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal -1/8 binary64) R) (.f64 (.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* R (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))))))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal 1/48 binary64) R) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal -1/8 binary64) R) (.f64 (.f64 lambda1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) R) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 (.f64 R (.f64 (.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda1) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 (.f64 lambda1 (.f64 (.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 lambda1 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 lambda1 (-.f64 (+.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))
(.f64 lambda1 (-.f64 (+.f64 (+.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (neg.f64 (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (+.f64 (.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (-.f64 (.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda1)) lambda1)) (neg.f64 lambda1))
(* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 (.f64 R (.f64 (.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (.f64 R lambda1) (.f64 (.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 lambda2 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 lambda2 (-.f64 (+.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))
(.f64 lambda2 (-.f64 (+.f64 (+.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)))
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (neg.f64 (.f64 R lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (+.f64 (.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (-.f64 (.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 R (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 (.f64 R phi1) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 R (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 R (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 (.f64 R phi1) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 #s(literal 1/12 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (.f64 R (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))))))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) R) phi1) (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 R phi2) phi1) (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (.f64 R (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (-.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 R phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) phi1))) phi1)) phi1)))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 (.f64 R phi2) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 (.f64 R phi2) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) #s(literal 3 binary64)))) (.f64 (.f64 phi2 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))))))) (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))))))))
(* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(.f64 (.f64 R phi2) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))
(.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 R (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 phi2))))))
(* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(.f64 phi2 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 R (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 phi2))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 phi2 (*.f64 phi2 phi2))))))
(* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi2)) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (.f64 R (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi1 #s(literal 2 binary64)))) phi2)))))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) phi2)))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 R (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))) phi2)) phi2)))
(sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda1 (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))) (.f64 (.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))) (.f64 (.f64 lambda1 (.f64 (.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) #s(literal 3 binary64)))))))) (.f64 (.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (.f64 lambda1 lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (/.f64 lambda2 lambda1) (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda1)) lambda1))) (neg.f64 lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda1 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (.f64 (.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda1 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))
(.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (.f64 lambda2 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (/.f64 lambda1 lambda2) (.f64 (/.f64 (-.f64 phi1 phi2) lambda2) (/.f64 (-.f64 phi1 phi2) lambda2))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (/.f64 (-.f64 phi1 phi2) lambda2) (/.f64 (-.f64 phi1 phi2) lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 lambda1 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 (-.f64 lambda1 lambda2) phi2)
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 #s(literal 1/12 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 phi2 phi1) (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (.f64 phi2 (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) phi1)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) #s(literal 3 binary64)))) (.f64 (.f64 phi2 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))))))))))
(* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(.f64 phi2 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) phi2)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 phi2)))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))
(.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) phi2)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 phi2))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 phi2 (.f64 phi2 phi2)))))))
(* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64)))))) phi2)))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))) (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))) phi2)) phi2)))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (neg.f64 lambda1))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 #s(literal -1/4 binary64) (.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) phi2))) lambda2))
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (-.f64 lambda1 lambda2) phi2)) (.f64 #s(literal -1/8 binary64) (*.f64 phi1 (-.f64 lambda1 lambda2))))) lambda2))
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (-.f64 lambda1 lambda2) phi2)) (.f64 phi1 (+.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (.f64 (.f64 phi1 (.f64 (-.f64 lambda1 lambda2) phi2)) #s(literal 1/96 binary64)))))) lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 lambda1 lambda2) phi2))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 lambda1 lambda2) phi2))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 lambda1 lambda2) phi2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 lambda1 lambda2) phi2))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 lambda1 lambda2) phi2))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 lambda1 lambda2) phi2))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/8 binary64)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/384 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* -1/4 (* phi1 phi2))
(.f64 (.f64 phi1 phi2) #s(literal -1/4 binary64))
(* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))
(.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 #s(literal 1/96 binary64) (.f64 phi2 (*.f64 phi1 phi1)))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))
(.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi2 (.f64 phi1 phi1)) #s(literal -1/7680 binary64)) (.f64 phi2 #s(literal 1/96 binary64))))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))
(.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 phi2 #s(literal 1/96 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 phi2 #s(literal -1/7680 binary64)) (.f64 (.f64 phi2 (*.f64 phi1 phi1)) #s(literal 1/1290240 binary64))))))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
1
#s(literal 1 binary64)
(+ 1 (* -1/4 (* phi1 phi2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi2) #s(literal -1/4 binary64)))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))
(+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64)))))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))
(+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 phi1 (+.f64 (.f64 (*.f64 phi1 phi2) #s(literal 1/96 binary64)) #s(literal -1/8 binary64))))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(.f64 phi2 (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(.f64 phi2 (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(.f64 phi2 (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2)))

eval215.0ms (1.3%)

Compiler: Compiled 37826 to 3033 computations (92% saved)

prune221.0ms (1.3%)

Pruning

47 alts after pruning (45 fresh and 2 done)

	Pruned	Kept	Total
New	1128	30	1158
Fresh	6	15	21
Picked	3	2	5
Done	0	0	0
Total	1137	47	1184

Accuracy

98.0%

Counts

1184 → 47

Alt Table

Click to see full alt table

Status	Accuracy	Program
	7.0%	(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))
	23.7%	(-.f64 #s(literal 0 binary64) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 R lambda1)))
	23.7%	(-.f64 #s(literal 0 binary64) (.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 R lambda1)))
▶	22.6%	(-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)))
	23.9%	(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
	24.5%	(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
	55.0%	(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
▶	29.2%	(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
	36.5%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)) (neg.f64 lambda1))
	37.1%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (neg.f64 lambda1))
	12.2%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
	22.5%	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
	21.7%	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
▶	22.8%	(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
	20.9%	(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
	6.6%	(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
	10.7%	(.f64 (neg.f64 (.f64 R lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
	10.0%	(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
	26.2%	(.f64 (neg.f64 (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
	10.4%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
	51.9%	(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
	16.3%	(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)))
▶	85.4%	(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
	66.9%	(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
	82.3%	(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
	72.0%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))))) (-.f64 phi1 phi2)))
	82.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
	72.2%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 #s(literal -1/8 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2)))
	73.6%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/8 binary64) phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
	72.9%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal 1/48 binary64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
▶	89.6%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
✓	91.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
	74.8%	(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
	24.8%	(.f64 R (hypot.f64 (exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64))) (-.f64 phi1 phi2)))
	22.0%	(.f64 R (.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))
	22.0%	(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
	24.3%	(.f64 R (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) lambda2))
	10.0%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
	10.4%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
	22.8%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
	8.6%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
	24.5%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
	20.9%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
	6.6%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
	51.7%	(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
	58.2%	(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
✓	31.8%	(*.f64 R phi2)

Compiler

Compiled 2081 to 1349 computations (35.2% saved)

simplify185.0ms (1.1%)

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
✓	cost-diff	6400	(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
✓	cost-diff	6400	(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))
✓	cost-diff	6528	(-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)))
✓	cost-diff	0	(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
✓	cost-diff	0	(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
✓	cost-diff	0	(*.f64 R lambda2)
✓	cost-diff	0	(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
✓	cost-diff	0	(-.f64 phi1 phi2)
✓	cost-diff	0	(-.f64 lambda1 lambda2)
✓	cost-diff	0	(hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))
✓	cost-diff	0	(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
✓	cost-diff	0	(*.f64 R phi1)
✓	cost-diff	0	(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
✓	cost-diff	0	(-.f64 lambda1 lambda2)
✓	cost-diff	0	(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))
✓	cost-diff	0	(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2))
✓	cost-diff	0	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))

Rules

3114×	`-lowering-.f32`
3114×	`-lowering-.f64`
1628×	`sum3-define`
1212×	`fnmadd-define`
1142×	`fma-lowering-fma.f32`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	42	292
1	108	287
2	307	287
3	1038	283
4	4347	283
0	8157	283

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi2)))
(- lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi2))
(* 1/2 phi2)
1/2
phi2
(- phi1 phi2)
phi1
(- 0 (* R phi1))
0
(* R phi1)
R
phi1
(* R (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2))))
(- lambda1 lambda2)
lambda1
lambda2
(- phi1 phi2)
phi1
phi2
(* (* R lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))
(* R lambda2)
R
lambda2
(+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(* (* -1/2 phi2) (sin (* 1/2 phi1)))
(* -1/2 phi2)
-1/2
phi2
(sin (* 1/2 phi1))
(- 0 (* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1)))
0
(* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))
phi2
(+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1))))
(* (* -1/8 phi2) (cos (* 1/2 phi1)))
(* -1/8 phi2)
-1/8
(* -1/2 (sin (* 1/2 phi1)))
-1/2
(sin (* 1/2 phi1))
(* R lambda1)
R
lambda1

Outputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2))
(* (- lambda1 lambda2) (cos (* 1/2 phi2)))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
1/2
#s(literal 1/2 binary64)
phi2
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
(- 0 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
0
#s(literal 0 binary64)
(* R phi1)
(*.f64 R phi1)
R
phi1
(* R (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2)))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
phi2
(* (* R lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R lambda2)
(*.f64 R lambda2)
R
lambda2
(+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(* (* -1/2 phi2) (sin (* 1/2 phi1)))
(.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 phi2)
(*.f64 phi2 #s(literal -1/2 binary64))
-1/2
#s(literal -1/2 binary64)
phi2
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(- 0 (* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1)))
(.f64 (.f64 R lambda1) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 #s(literal -1 binary64) (.f64 (.f64 phi2 phi2) #s(literal 1/8 binary64)))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal 1/2 binary64) phi2))))
0
#s(literal 0 binary64)
(* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1))
(.f64 R (.f64 lambda1 (+.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (.f64 phi2 (*.f64 phi2 #s(literal -1/8 binary64))) #s(literal 1 binary64))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1))))))
(+.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (.f64 phi2 (*.f64 phi2 #s(literal -1/8 binary64))) #s(literal 1 binary64))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))
(.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
phi2
(+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* (* -1/8 phi2) (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))
(* -1/8 phi2)
(*.f64 phi2 #s(literal -1/8 binary64))
-1/8
#s(literal -1/8 binary64)
(* -1/2 (sin (* 1/2 phi1)))
(.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))
-1/2
#s(literal -1/2 binary64)
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* R lambda1)
(*.f64 R lambda1)
R
lambda1

localize312.0ms (1.9%)

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
✓	accuracy	99.8%	(.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
✓	accuracy	99.8%	(.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓	accuracy	88.8%	(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))
✓	accuracy	100.0%	(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
✓	accuracy	100.0%	(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
✓	accuracy	99.9%	(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓	accuracy	96.9%	(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
✓	accuracy	100.0%	(hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))
✓	accuracy	100.0%	(-.f64 phi1 phi2)
✓	accuracy	100.0%	(-.f64 lambda1 lambda2)
✓	accuracy	100.0%	(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
✓	accuracy	100.0%	(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
✓	accuracy	100.0%	(*.f64 R phi1)
✓	accuracy	100.0%	(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
✓	accuracy	100.0%	(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2))
✓	accuracy	100.0%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
✓	accuracy	99.8%	(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))

Results

218.0ms	255×	0	valid
3.0ms	1×	3	valid

Compiler

Compiled 305 to 38 computations (87.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 154.0ms

ival-mult: 69.0ms (44.9% of total)

ival-sin: 42.0ms (27.3% of total)

compiled-spec: 14.0ms (9.1% of total)

ival-cos: 12.0ms (7.8% of total)

ival-sub: 6.0ms (3.9% of total)

ival-add: 6.0ms (3.9% of total)

ival-sqrt: 4.0ms (2.6% of total)

const: 1.0ms (0.7% of total)

backward-pass: 0.0ms (0% of total)

series90.0ms (0.5%)

Counts

21 → 672

Calls

Call 1

Inputs
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (* (- lambda1 lambda2) (cos (* 1/2 phi2)))>
#<alt (- lambda1 lambda2)>
#<alt (- 0 (* R phi1))>
#<alt (* R phi1)>
#<alt (* R (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (- phi1 phi2)>
#<alt (* (* R lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))>
#<alt (* R lambda2)>
#<alt (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))>
#<alt (cos (* 1/2 phi1))>
#<alt (- 0 (* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1)))>
#<alt (* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1))))))>
#<alt (cos (* 1/2 phi2))>
#<alt (* (* -1/2 phi2) (sin (* 1/2 phi1)))>
#<alt (sin (* 1/2 phi1))>
#<alt (* (* -1/8 phi2) (cos (* 1/2 phi1)))>
#<alt (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))>

Outputs
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2)))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))>
#<alt (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))>
#<alt (* -1 (* R phi2))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2)))))))))>
#<alt (* -1 (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda1)) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (cos (* 1/2 phi2)))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2)))))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda2)) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))>
#<alt (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))>
#<alt phi2>
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (* -1 phi2)>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (- lambda1 lambda2)>
#<alt (- (+ lambda1 (* -1/8 (* (pow phi2 2) (- lambda1 lambda2)))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi2 2) (- lambda1 lambda2)))))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R lambda1)>
#<alt (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))>
#<alt (* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2))))))>
#<alt (* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)))))))>
#<alt (* -1 (* R lambda1))>
#<alt (* -1 (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1)))))>
#<alt (* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda1)) (* R lambda2)) lambda1)))))>
#<alt (* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)) (* R lambda2)) lambda1)))))>
#<alt (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R lambda2)>
#<alt (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2))))>
#<alt (* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2))))))>
#<alt (* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)))))))>
#<alt (* -1 (* R lambda2))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda2)) (* R lambda1)) lambda2)))))>
#<alt (* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2))) lambda2)) (* R lambda1)) lambda2)))))>
#<alt (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (* -1 (* R phi2))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) phi2))) phi2)) (* R phi1)) phi2)))))>
#<alt (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2))))))>
#<alt (* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))>
#<alt (* -1 lambda1)>
#<alt (* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))>
#<alt (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda1))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1)) (* 1/2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)))))>
#<alt (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt lambda2>
#<alt (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))>
#<alt (* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2))))))>
#<alt (* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda2))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2)) (* 1/2 (pow (- phi1 phi2) 2))) lambda2))) lambda2)))))>
#<alt (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) phi1)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)))))>
#<alt (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))>
#<alt phi2>
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2)))))))>
#<alt (* -1 phi2)>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) phi2)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi2))) phi2)))))>
#<alt (* -1 phi2)>
#<alt (- phi1 phi2)>
#<alt (- phi1 phi2)>
#<alt (- phi1 phi2)>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt phi1>
#<alt (* -1 (* phi1 (- (/ phi2 phi1) 1)))>
#<alt (* -1 (* phi1 (- (/ phi2 phi1) 1)))>
#<alt (* -1 (* phi1 (- (/ phi2 phi1) 1)))>
#<alt phi1>
#<alt (+ phi1 (* -1 phi2))>
#<alt (+ phi1 (* -1 phi2))>
#<alt (+ phi1 (* -1 phi2))>
#<alt (* -1 phi2)>
#<alt (* phi2 (- (/ phi1 phi2) 1))>
#<alt (* phi2 (- (/ phi1 phi2) 1))>
#<alt (* phi2 (- (/ phi1 phi2) 1))>
#<alt (* -1 phi2)>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R lambda2)>
#<alt (+ (* -1/4 (* R (* lambda2 (* phi1 phi2)))) (* R lambda2))>
#<alt (+ (* R lambda2) (* phi1 (+ (* -1/4 (* R (* lambda2 phi2))) (* -1/8 (* R (* lambda2 phi1))))))>
#<alt (+ (* R lambda2) (* phi1 (+ (* -1/4 (* R (* lambda2 phi2))) (* phi1 (+ (* -1/8 (* R lambda2)) (* 1/96 (* R (* lambda2 (* phi1 phi2)))))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))>
#<alt (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))>
#<alt (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))>
#<alt (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt 1>
#<alt (+ 1 (* -1/4 (* phi1 phi2)))>
#<alt (+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))>
#<alt (+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (* -1 (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))>
#<alt (- (* 1/4 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))>
#<alt (- (* phi1 (- (* -1 (* R (* lambda1 (* phi1 (- (* 1/64 (pow phi2 2)) 1/8))))) (* -1/4 (* R (* lambda1 phi2))))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))>
#<alt (- (* phi1 (- (* phi1 (- (* -1/96 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (- (* 1/64 (pow phi2 2)) 1/8))))) (* -1/4 (* R (* lambda1 phi2))))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (- (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (* 1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))>
#<alt (* (pow phi2 2) (- (* 1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))>
#<alt (* (pow phi2 2) (- (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2))) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))>
#<alt (* (pow phi2 2) (- (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2))) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))>
#<alt (* 1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))>
#<alt (* (pow phi2 2) (- (* 1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))>
#<alt (* (pow phi2 2) (- (* -1 (/ (- (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))>
#<alt (* (pow phi2 2) (- (* -1 (/ (- (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))>
#<alt (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2)))))>
#<alt (+ (* -1/4 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))>
#<alt (+ (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))) (* phi1 (+ (* -1/4 (* R (* lambda1 phi2))) (* R (* lambda1 (* phi1 (- (* 1/64 (pow phi2 2)) 1/8)))))))>
#<alt (+ (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))) (* phi1 (+ (* -1/4 (* R (* lambda1 phi2))) (* phi1 (+ (* 1/96 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (- (* 1/64 (pow phi2 2)) 1/8))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* -1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2)))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2)))))>
#<alt (* -1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))>
#<alt (* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))>
#<alt (* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (+ 1 (* -1/8 (pow phi2 2)))>
#<alt (+ 1 (+ (* -1/4 (* phi1 phi2)) (* -1/8 (pow phi2 2))))>
#<alt (+ 1 (+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/64 (pow phi2 2)) 1/8))))))>
#<alt (+ 1 (+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (- (+ (* 1/96 (* phi1 phi2)) (* 1/64 (pow phi2 2))) 1/8))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))>
#<alt (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (+ (* -1/8 (cos (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) (pow phi2 2)))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (+ (* -1/8 (cos (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) (pow phi2 2)))))>
#<alt (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow phi2 2)))>
#<alt (+ 1 (* (pow phi2 2) (- (* 1/384 (pow phi2 2)) 1/8)))>
#<alt (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/384 (* -1/46080 (pow phi2 2)))) 1/8)))>
#<alt (cos (* 1/2 phi2))>
#<alt (cos (* 1/2 phi2))>
#<alt (cos (* 1/2 phi2))>
#<alt (cos (* 1/2 phi2))>
#<alt (cos (* 1/2 phi2))>
#<alt (cos (* 1/2 phi2))>
#<alt (cos (* 1/2 phi2))>
#<alt (cos (* 1/2 phi2))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/4 (* phi1 phi2))>
#<alt (* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))>
#<alt (* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))>
#<alt (* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* 1/2 phi1)>
#<alt (* phi1 (+ 1/2 (* -1/48 (pow phi1 2))))>
#<alt (* phi1 (+ 1/2 (* (pow phi1 2) (- (* 1/3840 (pow phi1 2)) 1/48))))>
#<alt (* phi1 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3840 (* -1/645120 (pow phi1 2)))) 1/48))))>
#<alt (sin (* 1/2 phi1))>
#<alt (sin (* 1/2 phi1))>
#<alt (sin (* 1/2 phi1))>
#<alt (sin (* 1/2 phi1))>
#<alt (sin (* 1/2 phi1))>
#<alt (sin (* 1/2 phi1))>
#<alt (sin (* 1/2 phi1))>
#<alt (sin (* 1/2 phi1))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 phi2)>
#<alt (+ (* -1/8 phi2) (* 1/64 (* (pow phi1 2) phi2)))>
#<alt (+ (* -1/8 phi2) (* (pow phi1 2) (+ (* -1/3072 (* (pow phi1 2) phi2)) (* 1/64 phi2))))>
#<alt (+ (* -1/8 phi2) (* (pow phi1 2) (+ (* 1/64 phi2) (* (pow phi1 2) (+ (* -1/3072 phi2) (* 1/368640 (* (pow phi1 2) phi2)))))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/8 (* phi2 (cos (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))>
#<alt (* -1/8 (pow phi2 2))>
#<alt (+ (* -1/4 (* phi1 phi2)) (* -1/8 (pow phi2 2)))>
#<alt (+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* 1/64 (* phi1 (pow phi2 2))))))>
#<alt (+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (+ (* 1/96 (* phi1 phi2)) (* 1/64 (pow phi2 2)))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))>

Calls

168 calls:

Time	Variable		Point	Expression
13.0ms	phi2	@	inf	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
6.0ms	phi2	@	-inf	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
3.0ms	phi1	@	-inf	(* (* R lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))
2.0ms	R	@	0	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
2.0ms	lambda1	@	0	(- 0 (* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1)))

rewrite493.0ms (2.9%)

Algorithm

1×	batch-egg-rewrite

Rules

3838×	`-lowering-.f32`
3838×	`-lowering-.f64`
3410×	`/-lowering-/.f32`
3410×	`/-lowering-/.f64`
1562×	`fma-lowering-fma.f32`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	42	212
1	217	207
2	2019	207
0	8684	207

Stop Event

1×	iter limit
1×	node limit

Counts

21 → 485

Calls

Call 1

Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi2)))
(- lambda1 lambda2)
(- 0 (* R phi1))
(* R phi1)
(* R (sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (- lambda1 lambda2) (- lambda1 lambda2)) (* (- phi1 phi2) (- phi1 phi2))))
(- phi1 phi2)
(* (* R lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))
(* R lambda2)
(+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))
(cos (* 1/2 phi1))
(- 0 (* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1)))
(* (+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))) (* R lambda1))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 phi2))
(* (* -1/2 phi2) (sin (* 1/2 phi1)))
(sin (* 1/2 phi1))
(* (* -1/8 phi2) (cos (* 1/2 phi1)))
(* phi2 (+ (* (* -1/8 phi2) (cos (* 1/2 phi1))) (* -1/2 (sin (* 1/2 phi1)))))

Outputs
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
(.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)) R)
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))))))))
(/.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2))))))))) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 6 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 6 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (neg.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2)))))))))
(/.f64 (neg.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2))))))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2)))))))))) #s(literal 1/2 binary64)))
(.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))))))))))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(.f64 (pow.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 1 binary64)))
(fma.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1 binary64))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1 binary64)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1 binary64)) (-.f64 lambda1 lambda2))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(exp.f64 (*.f64 (log.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (.f64 lambda1 lambda1) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))) (/.f64 (.f64 lambda2 lambda2) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (neg.f64 (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))))
(/.f64 (-.f64 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 lambda2 (.f64 lambda2 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (.f64 (.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 lambda2 lambda2))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))))) (neg.f64 (neg.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)))) (neg.f64 (neg.f64 (+.f64 lambda1 lambda2))))
(pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) #s(literal -1 binary64))
(.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(.f64 (pow.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (.f64 (.f64 R phi1) (/.f64 (.f64 R phi1) (*.f64 R phi1))))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 R phi1)) (.f64 R phi1))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))))
(fma.f64 R (neg.f64 phi1) #s(literal 0 binary64))
(fma.f64 phi1 (-.f64 #s(literal 0 binary64) R) #s(literal 0 binary64))
(fma.f64 (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (/.f64 #s(literal 1 binary64) (.f64 R phi1)) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) R) phi1 #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 R phi1) #s(literal 0 binary64))
(fma.f64 (neg.f64 phi1) R #s(literal 0 binary64))
(neg.f64 (*.f64 R phi1))
(/.f64 (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1))) (.f64 R (.f64 phi1 (.f64 R phi1))))
(/.f64 (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1))) (+.f64 #s(literal 0 binary64) (-.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 R phi1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (.f64 R phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 R phi1))))
(/.f64 (neg.f64 (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))) (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))))
(/.f64 (neg.f64 (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))) (neg.f64 (+.f64 #s(literal 0 binary64) (-.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1))))) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R phi1) (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 R phi1) (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))) (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (.f64 R (.f64 phi1 (.f64 R phi1)))))
(/.f64 (neg.f64 (neg.f64 (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1))))
(pow.f64 (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 R phi1) (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1))))) #s(literal -1 binary64))
(*.f64 R (neg.f64 phi1))
(*.f64 phi1 (-.f64 #s(literal 0 binary64) R))
(.f64 (.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 R phi1))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 R phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) R) phi1)
(.f64 #s(literal -1 binary64) (.f64 R phi1))
(*.f64 (neg.f64 phi1) R)
(+.f64 #s(literal 0 binary64) (*.f64 R phi1))
(+.f64 (*.f64 R phi1) #s(literal 0 binary64))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 R phi1)) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))))
(fma.f64 R phi1 #s(literal 0 binary64))
(fma.f64 phi1 R #s(literal 0 binary64))
(/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (.f64 R phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (-.f64 #s(literal 0 binary64) (.f64 R phi1)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1))))
(/.f64 (+.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (.f64 R (.f64 phi1 (.f64 R phi1))))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))) (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))))
(*.f64 R phi1)
(*.f64 phi1 R)
(.f64 (/.f64 R R) (/.f64 (.f64 phi1 (*.f64 R phi1)) phi1))
(.f64 (/.f64 R phi1) (/.f64 (.f64 phi1 (*.f64 R phi1)) R))
(.f64 (/.f64 phi1 R) (/.f64 (.f64 R (*.f64 R phi1)) phi1))
(.f64 (/.f64 phi1 phi1) (/.f64 (.f64 R (*.f64 R phi1)) R))
(.f64 (/.f64 (.f64 R phi1) R) (/.f64 (*.f64 R phi1) phi1))
(.f64 (/.f64 (.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R))
(.f64 (/.f64 (.f64 phi1 phi1) R) (/.f64 (*.f64 R R) phi1))
(.f64 (/.f64 (.f64 R R) phi1) (/.f64 (*.f64 phi1 phi1) R))
(.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R))
(.f64 (/.f64 (.f64 R R) R) (/.f64 (*.f64 phi1 phi1) phi1))
(.f64 (/.f64 (.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1))
(.f64 (/.f64 (.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R))
(.f64 (/.f64 (.f64 (*.f64 R phi1) phi1) R) (/.f64 R phi1))
(.f64 (/.f64 (.f64 (*.f64 R phi1) phi1) phi1) (/.f64 R R))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)) R)
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64)))
(hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (-.f64 lambda1 lambda2))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(/.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(/.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (sqrt.f64 (neg.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (neg.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (neg.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64))
(.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) #s(literal 1/2 binary64)))
(.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(.f64 (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 1/4 binary64)))
(+.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))
(+.f64 (-.f64 #s(literal 0 binary64) phi2) phi1)
(exp.f64 (*.f64 (log.f64 (-.f64 phi1 phi2)) #s(literal 1 binary64)))
(-.f64 phi1 phi2)
(-.f64 (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1)))) (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1)) (/.f64 (.f64 phi2 phi2) (+.f64 phi2 phi1)))
(-.f64 (/.f64 (.f64 phi1 phi1) (-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))) (/.f64 (.f64 phi2 phi2) (-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))))
(fma.f64 #s(literal -1 binary64) phi2 phi1)
(/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1))))
(/.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (+.f64 (.f64 phi1 phi1) (-.f64 (.f64 phi2 phi2) (*.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)))))
(/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (+.f64 phi2 phi1))
(/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)))
(/.f64 (neg.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) (neg.f64 (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) (neg.f64 (+.f64 (.f64 phi1 phi1) (-.f64 (.f64 phi2 phi2) (*.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))))))
(/.f64 (neg.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2))) (neg.f64 (+.f64 phi2 phi1)))
(/.f64 (neg.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2))) (neg.f64 (-.f64 phi1 (-.f64 #s(literal 0 binary64) phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1))) (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 phi1) (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1))) (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 phi2 phi1) (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)))))
(/.f64 (-.f64 (.f64 (.f64 phi1 (.f64 phi1 phi1)) (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1)))) (.f64 (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1))) (.f64 phi2 (.f64 phi2 phi2)))) (.f64 (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 phi2 phi1)) (.f64 (+.f64 phi2 phi1) (.f64 phi2 phi2))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))))) (neg.f64 (neg.f64 (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)))) (neg.f64 (neg.f64 (+.f64 phi2 phi1))))
(pow.f64 (-.f64 phi1 phi2) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 phi2 phi1))) (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 phi2 phi1) (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2))) #s(literal -1 binary64))
(.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(.f64 (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))
(.f64 (pow.f64 (-.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)) #s(literal 1 binary64)))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))))
(+.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))))) (/.f64 (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))))))
(fma.f64 R (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(fma.f64 R (.f64 lambda2 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 lambda2 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(fma.f64 lambda2 (.f64 R (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(fma.f64 (.f64 R lambda2) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 R lambda2)) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2)) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 R lambda2)) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 R lambda2) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) R (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(fma.f64 (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) R (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) R) lambda2 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(fma.f64 (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) R) lambda2 (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (.f64 R lambda2) #s(literal -1/2 binary64)) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (.f64 R lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2)))))
(/.f64 (.f64 (.f64 R lambda2) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (.f64 (.f64 R lambda2) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 R lambda2)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2))) (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda2))))))
(/.f64 (neg.f64 (.f64 (.f64 R lambda2) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (.f64 (.f64 R lambda2) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2))))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (.f64 R lambda2))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2))) (.f64 R lambda2))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(.f64 R (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(.f64 lambda2 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 R lambda2))
(.f64 (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) R)
(.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) R) lambda2)
(*.f64 R lambda2)
(*.f64 lambda2 R)
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(-.f64 (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 phi2 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 phi2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 phi2))))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)))) (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))))) (neg.f64 (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 phi2)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))))
(+.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)))
(-.f64 (/.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))))) (/.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))))))
(fma.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (neg.f64 (.f64 R lambda1)) #s(literal 0 binary64))
(fma.f64 (.f64 R lambda1) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64))) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal -2 binary64)) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 R lambda1) #s(literal 0 binary64))
(fma.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (neg.f64 lambda1) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)) #s(literal 0 binary64))
(fma.f64 (neg.f64 (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 0 binary64))
(fma.f64 (neg.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) lambda1 #s(literal 0 binary64))
(fma.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) R) lambda1 #s(literal 0 binary64))
(fma.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda1) R #s(literal 0 binary64))
(neg.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64))) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))) (.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64)))) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 4 binary64)))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)))))
(pow.f64 (/.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (neg.f64 (*.f64 R lambda1)))
(.f64 (.f64 R lambda1) (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64))) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)) #s(literal -2 binary64)))
(.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))))
(.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (*.f64 R lambda1))
(.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (neg.f64 lambda1))
(.f64 #s(literal -1 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)))
(.f64 (neg.f64 (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(.f64 (neg.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) lambda1)
(.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) R) lambda1)
(.f64 (.f64 (-.f64 #s(literal 0 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda1) R)
(+.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)))
(+.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)) #s(literal 0 binary64))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda1) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(+.f64 (.f64 (.f64 R lambda1) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 R lambda1)))
(+.f64 (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 R lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)))
(-.f64 (/.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (/.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)))))
(fma.f64 R (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 0 binary64))
(fma.f64 lambda1 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 0 binary64))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 R lambda1)))
(fma.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 R lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)))
(fma.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1) #s(literal 0 binary64))
(fma.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 R lambda1) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(fma.f64 (.f64 R lambda1) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 0 binary64))
(fma.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda1 #s(literal 0 binary64))
(fma.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1) R #s(literal 0 binary64))
(/.f64 (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64))) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64)))
(/.f64 (.f64 (.f64 R lambda1) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (.f64 (.f64 R lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (.f64 R lambda1)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (.f64 R lambda1)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (.f64 (.f64 R lambda1) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (.f64 (.f64 R lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (.f64 R lambda1))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (.f64 R lambda1))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 R (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 lambda1 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda1)
(.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) lambda1) R)
(.f64 (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) R) (/.f64 (.f64 (.f64 R lambda1) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1) (/.f64 (.f64 (.f64 R lambda1) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 (.f64 R lambda1) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (*.f64 R lambda1)))
(.f64 (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (/.f64 (.f64 (.f64 R lambda1) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (.f64 (.f64 R lambda1) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))) lambda1))
(.f64 (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (.f64 (.f64 R lambda1) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))) R))
(.f64 (/.f64 (.f64 R lambda1) R) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 R lambda1) lambda1) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (*.f64 R lambda1)))
(.f64 (/.f64 (.f64 R lambda1) (.f64 R lambda1)) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (.f64 R lambda1) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))) lambda1))
(.f64 (/.f64 (.f64 R lambda1) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))) R))
(.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) R) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) lambda1) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)) lambda1))
(.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (*.f64 R lambda1)))
(.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R lambda1)) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)) R))
(.f64 (/.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) R) (/.f64 (.f64 lambda1 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda1) (/.f64 (.f64 lambda1 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 lambda1 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (*.f64 R lambda1)))
(.f64 (/.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 R lambda1)) (/.f64 (.f64 lambda1 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (.f64 lambda1 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))) lambda1))
(.f64 (/.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (.f64 lambda1 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1))) R))
(.f64 (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) R) (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) lambda1) (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) lambda1))
(.f64 (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) (*.f64 R lambda1)))
(.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) (.f64 R lambda1)) (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 R lambda1)) (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (*.f64 R lambda1)))
(.f64 (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (.f64 (.f64 R lambda1) (*.f64 R lambda1)) lambda1))
(.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) lambda1) (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (.f64 (.f64 R lambda1) (*.f64 R lambda1)) R))
(.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) R) (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 R lambda1)) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 2 binary64)) R))
(.f64 (/.f64 (pow.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 2 binary64)) R) (/.f64 (.f64 lambda1 lambda1) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (pow.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 2 binary64)) lambda1) (/.f64 (.f64 lambda1 lambda1) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (pow.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 2 binary64)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 lambda1 lambda1) (.f64 R lambda1)))
(.f64 (/.f64 (pow.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 2 binary64)) (.f64 R lambda1)) (/.f64 (.f64 lambda1 lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (pow.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 2 binary64)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (.f64 lambda1 lambda1) lambda1))
(.f64 (/.f64 (pow.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 2 binary64)) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (.f64 lambda1 lambda1) R))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) R) (/.f64 (.f64 R lambda1) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda1) (/.f64 (.f64 R lambda1) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (.f64 R lambda1) (*.f64 R lambda1)))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 R lambda1)) (/.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (*.f64 R lambda1) lambda1))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (*.f64 R lambda1) R))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R lambda1)) R) (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R lambda1)) lambda1) (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R lambda1)) (.f64 R lambda1)) (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) lambda1))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R lambda1)) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) R))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) R) (/.f64 lambda1 (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) lambda1) (/.f64 lambda1 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 lambda1 (*.f64 R lambda1)))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (.f64 R lambda1)) (/.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) (/.f64 lambda1 lambda1))
(.f64 (/.f64 (.f64 (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 R lambda1)) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (/.f64 lambda1 R))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(-.f64 (/.f64 (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) phi2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 #s(literal -1/8 binary64)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/8 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)))) (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))))) (neg.f64 (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (+.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(.f64 phi2 (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))
(.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) phi2)
(.f64 (.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/2 binary64))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(.f64 phi2 (.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))
(.f64 #s(literal -1/8 binary64) (.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/8 binary64))
(.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) phi2)
(+.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/8 binary64)) phi2)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 (/.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 phi2 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 #s(literal -1/2 binary64) (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)))
(fma.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)))
(fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) phi2 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)))
(fma.f64 (.f64 phi2 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/2 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)))
(fma.f64 (.f64 phi2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 phi2 (.f64 phi2 #s(literal -1/8 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2))) (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (.f64 phi2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 #s(literal -1/8 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))))))
(/.f64 (.f64 phi2 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 #s(literal -1/8 binary64)))) (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) phi2) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 #s(literal -1/8 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64)))))))
(/.f64 (.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 #s(literal -1/8 binary64)))) (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))))) phi2) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) #s(literal 2 binary64)) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 phi2 phi2)))) (neg.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) phi2)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (neg.f64 (.f64 phi2 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))))) (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 #s(literal -1/8 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64))))))))
(/.f64 (neg.f64 (.f64 phi2 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 #s(literal -1/8 binary64)))) (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))))))) (neg.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (neg.f64 (.f64 (+.f64 (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) phi2)) (neg.f64 (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 #s(literal -1/8 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/8 binary64))))))))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 phi2 #s(literal -1/8 binary64)))) (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))))) phi2)) (neg.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2)

simplify575.0ms (3.4%)

Algorithm

1×	egg-herbie

Rules

6968×	`-lowering-.f32`
6968×	`-lowering-.f64`
3672×	`+-lowering-+.f64`
3672×	`+-lowering-+.f32`
1506×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1382	13134
1	4826	12187
0	8041	12187

Stop Event

1×	iter limit
1×	node limit

Counts

672 → 672

Calls

Call 1

Inputs
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2))))))))
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2)))))))))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda1)) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (cos (* 1/2 phi2)))
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2))))))))
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2)))))))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda2)) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (cos (* 1/2 phi2)))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (cos (* 1/2 phi2)))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(- lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi2 2) (- lambda1 lambda2)))) lambda2)
(- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi2 2) (- lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))))
(* R lambda1)
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))
(* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2))))))
(* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)))))))
(* -1 (* R lambda1))
(* -1 (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1)))))
(* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda1)) (* R lambda2)) lambda1)))))
(* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)) (* R lambda2)) lambda1)))))
(* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))))
(* R lambda2)
(* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2))))
(* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2))))))
(* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)))))))
(* -1 (* R lambda2))
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))
(* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda2)) (* R lambda1)) lambda2)))))
(* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2))) lambda2)) (* R lambda1)) lambda2)))))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) phi2))) phi2)) (* R phi1)) phi2)))))
(sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))))))))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2))))))
(* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))
(* -1 lambda1)
(* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda1))) lambda1)))))
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1)) (* 1/2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)))))
(sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))))))))
lambda2
(* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))
(* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2))))))
(* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda2))) lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2)) (* 1/2 (pow (- phi1 phi2) 2))) lambda2))) lambda2)))))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) phi1)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)))))
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) phi2)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi2))) phi2)))))
(* -1 phi2)
(- phi1 phi2)
(- phi1 phi2)
(- phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
phi1
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(* -1 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R lambda2)
(+ (* -1/4 (* R (* lambda2 (* phi1 phi2)))) (* R lambda2))
(+ (* R lambda2) (* phi1 (+ (* -1/4 (* R (* lambda2 phi2))) (* -1/8 (* R (* lambda2 phi1))))))
(+ (* R lambda2) (* phi1 (+ (* -1/4 (* R (* lambda2 phi2))) (* phi1 (+ (* -1/8 (* R lambda2)) (* 1/96 (* R (* lambda2 (* phi1 phi2)))))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))
(* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))
(* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))
(* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))
(* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))
(* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
1
(+ 1 (* -1/4 (* phi1 phi2)))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
1
(+ 1 (* -1/8 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(* -1 (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(- (* 1/4 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(- (* phi1 (- (* -1 (* R (* lambda1 (* phi1 (- (* 1/64 (pow phi2 2)) 1/8))))) (* -1/4 (* R (* lambda1 phi2))))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(- (* phi1 (- (* phi1 (- (* -1/96 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (- (* 1/64 (pow phi2 2)) 1/8))))) (* -1/4 (* R (* lambda1 phi2))))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(- (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(* 1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))
(* (pow phi2 2) (- (* 1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(* (pow phi2 2) (- (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2))) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))
(* (pow phi2 2) (- (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2))) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))
(* 1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))
(* (pow phi2 2) (- (* 1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(* (pow phi2 2) (- (* -1 (/ (- (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(* (pow phi2 2) (- (* -1 (/ (- (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2)))))
(+ (* -1/4 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(+ (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))) (* phi1 (+ (* -1/4 (* R (* lambda1 phi2))) (* R (* lambda1 (* phi1 (- (* 1/64 (pow phi2 2)) 1/8)))))))
(+ (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))) (* phi1 (+ (* -1/4 (* R (* lambda1 phi2))) (* phi1 (+ (* 1/96 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (- (* 1/64 (pow phi2 2)) 1/8))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))
(+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))
(* -1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))
(* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2)))))
(* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2)))))
(* -1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))
(* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(+ 1 (* -1/8 (pow phi2 2)))
(+ 1 (+ (* -1/4 (* phi1 phi2)) (* -1/8 (pow phi2 2))))
(+ 1 (+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/64 (pow phi2 2)) 1/8))))))
(+ 1 (+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (- (+ (* 1/96 (* phi1 phi2)) (* 1/64 (pow phi2 2))) 1/8))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (+ (* -1/8 (cos (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) (pow phi2 2)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (+ (* -1/8 (cos (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) (pow phi2 2)))))
(* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
1
(+ 1 (* -1/8 (pow phi2 2)))
(+ 1 (* (pow phi2 2) (- (* 1/384 (pow phi2 2)) 1/8)))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/384 (* -1/46080 (pow phi2 2)))) 1/8)))
(cos (* 1/2 phi2))
(cos (* 1/2 phi2))
(cos (* 1/2 phi2))
(cos (* 1/2 phi2))
(cos (* 1/2 phi2))
(cos (* 1/2 phi2))
(cos (* 1/2 phi2))
(cos (* 1/2 phi2))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/4 (* phi1 phi2))
(* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* -1/48 (pow phi1 2))))
(* phi1 (+ 1/2 (* (pow phi1 2) (- (* 1/3840 (pow phi1 2)) 1/48))))
(* phi1 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3840 (* -1/645120 (pow phi1 2)))) 1/48))))
(sin (* 1/2 phi1))
(sin (* 1/2 phi1))
(sin (* 1/2 phi1))
(sin (* 1/2 phi1))
(sin (* 1/2 phi1))
(sin (* 1/2 phi1))
(sin (* 1/2 phi1))
(sin (* 1/2 phi1))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 phi2)
(+ (* -1/8 phi2) (* 1/64 (* (pow phi1 2) phi2)))
(+ (* -1/8 phi2) (* (pow phi1 2) (+ (* -1/3072 (* (pow phi1 2) phi2)) (* 1/64 phi2))))
(+ (* -1/8 phi2) (* (pow phi1 2) (+ (* 1/64 phi2) (* (pow phi1 2) (+ (* -1/3072 phi2) (* 1/368640 (* (pow phi1 2) phi2)))))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(* -1/8 (pow phi2 2))
(+ (* -1/4 (* phi1 phi2)) (* -1/8 (pow phi2 2)))
(+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* 1/64 (* phi1 (pow phi2 2))))))
(+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (+ (* 1/96 (* phi1 phi2)) (* 1/64 (pow phi2 2)))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))

Outputs
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (.f64 (.f64 R lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))) #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2)))))
(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))
(.f64 lambda1 (+.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda1 lambda1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))
(.f64 lambda1 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda1 (.f64 lambda1 lambda1)))) (.f64 (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1)) (/.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (.f64 (.f64 R lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))
(.f64 lambda2 (+.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda2 lambda2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))
(.f64 lambda2 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda2 lambda2))))) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))
(-.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (.f64 phi2 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R phi2) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))))))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 phi2 (-.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (.f64 (.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (*.f64 R phi1)))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi2 phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(.f64 phi2 (+.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 phi1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi2 phi2)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))))
(* -1 (* R phi2))
(*.f64 R (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2)))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)))) (.f64 (.f64 R (.f64 phi2 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)))) (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)))) (+.f64 (.f64 R (-.f64 #s(literal 0 binary64) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)))) (.f64 phi1 (-.f64 (.f64 phi1 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (.f64 (.f64 phi2 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)) #s(literal 3 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))))))) (.f64 (.f64 R phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (.f64 (/.f64 (.f64 #s(literal 1/2 binary64) R) phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (/.f64 phi2 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2)) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))) (.f64 (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2))) #s(literal 3 binary64)))))))) (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2))))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda1 lambda1))) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2)))))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda1 (.f64 lambda1 lambda1)))) (/.f64 (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 phi1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 phi1 phi2) lambda1)))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda1)) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda1)) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))) (.f64 (.f64 lambda1 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))) #s(literal 3 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda1)))))
(* lambda2 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2)
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)))
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2))))))))
(.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda2 lambda2))) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2)))))))))
(.f64 lambda2 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda1 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda2 lambda2)))))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 phi1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 phi1 phi2) lambda2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda2)) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 (-.f64 lambda1 lambda2) phi1)
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))
(-.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (.f64 (.f64 phi2 phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (+.f64 (-.f64 #s(literal 0 binary64) phi1) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (.f64 phi2 (-.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))) (.f64 (.f64 (.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))))))) (.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(.f64 phi2 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (/.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi2 phi2)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))) (/.f64 phi1 phi2))))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2))) phi2)) phi2)))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))) (.f64 (.f64 phi2 phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))) (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)))) (+.f64 (-.f64 #s(literal 0 binary64) phi2) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))) (.f64 phi1 (-.f64 (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))) (.f64 (.f64 (.f64 phi2 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2)) #s(literal 3 binary64)))))))) (.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 phi2 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (.f64 #s(literal -1/2 binary64) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) phi1)))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 #s(literal 0 binary64) lambda1))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi2 2) (- lambda1 lambda2)))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 (.f64 (*.f64 phi2 phi2) #s(literal -1/8 binary64)) (-.f64 lambda1 lambda2)) lambda2))
(- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi2 2) (- lambda1 lambda2)))))) lambda2)
(-.f64 (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 (*.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))) lambda2)
(- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/384 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/46080 binary64))))))) lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) lambda1))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R phi1)
(*.f64 R phi1)
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (- lambda1 lambda2) 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 lambda2 (-.f64 phi1 phi2)))
(+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (hypot.f64 lambda2 (-.f64 phi1 phi2))) (.f64 (.f64 R (.f64 lambda1 lambda2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))))
(+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (hypot.f64 lambda2 (-.f64 phi1 phi2))) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)))) (+.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))))))))
(+ (* R (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (hypot.f64 lambda2 (-.f64 phi1 phi2))) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (.f64 (.f64 lambda1 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)) (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)))) (*.f64 R lambda2)))))
(* R lambda1)
(*.f64 R lambda1)
(* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1))))
(.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1)))
(* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2))))))
(.f64 lambda1 (+.f64 (-.f64 R (/.f64 (.f64 R lambda2) lambda1)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 lambda1))))
(* lambda1 (+ R (+ (* -1 (/ (* R lambda2) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)))))))
(.f64 lambda1 (+.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (/.f64 lambda2 lambda1) (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1))) (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1))))) (/.f64 (*.f64 R lambda2) lambda1))))
(* -1 (* R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(* -1 (* lambda1 (+ R (* -1 (/ (* R lambda2) lambda1)))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda1)) (* R lambda2)) lambda1)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R lambda2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)) (* R lambda2)) lambda1)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R lambda2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (/.f64 (.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(+ (* -1 (* (* R (* lambda1 lambda2)) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (.f64 (.f64 R (.f64 lambda1 lambda2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))))
(+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))))))))
(+ (* R (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R lambda1) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (.f64 (.f64 lambda1 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)) (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))))))) (.f64 (.f64 R lambda1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))))))))
(* R lambda2)
(*.f64 R lambda2)
(* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2))))))
(.f64 lambda2 (+.f64 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 lambda2))))
(* lambda2 (+ R (+ (* -1 (/ (* R lambda1) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)))))))
(.f64 lambda2 (+.f64 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)) (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 lambda1 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)))))))
(* -1 (* R lambda2))
(*.f64 R (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ R (* -1 (/ (* R lambda1) lambda2)))))
(.f64 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) lambda2)) (* R lambda1)) lambda2)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R lambda1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- phi1 phi2) 2))) (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2))) lambda2)) (* R lambda1)) lambda2)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R lambda1) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (/.f64 (.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2)))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2)))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(-.f64 (.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (.f64 (.f64 R (.f64 phi2 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 (.f64 R (-.f64 #s(literal 0 binary64) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (.f64 phi1 (-.f64 (.f64 phi1 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (.f64 (.f64 phi2 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))))) (.f64 (.f64 R phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (.f64 (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) (/.f64 #s(literal 1/2 binary64) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (/.f64 phi2 phi1) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (-.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 (.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))) phi1)) phi1)))
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))
(-.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (.f64 phi2 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (+.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R phi2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 phi2 (-.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))) (.f64 (.f64 phi2 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (*.f64 R phi1)))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(.f64 phi2 (+.f64 R (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi2 phi2)) (/.f64 (.f64 R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(.f64 phi2 (+.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))
(* -1 (* R phi2))
(*.f64 R (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)) phi2)))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* R (* phi1 (pow (- lambda1 lambda2) 2))) phi2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 (.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) phi2)))) phi2)) phi2)))
(sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))
(hypot.f64 lambda2 (-.f64 phi1 phi2))
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))
(-.f64 (hypot.f64 lambda2 (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))))
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))))))
(+.f64 (hypot.f64 lambda2 (-.f64 phi1 phi2)) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)))) (+.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))))))
(+ (sqrt (+ (pow lambda2 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* lambda2 (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda2 2) (+ (pow lambda2 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda2 2) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (hypot.f64 lambda2 (-.f64 phi1 phi2)) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))) (.f64 (.f64 (.f64 lambda1 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)) (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)))))))))) (.f64 lambda2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))))))
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2))))))
(.f64 lambda1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1)))))
(* lambda1 (+ 1 (+ (* -1 (/ lambda2 lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))
(.f64 lambda1 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 lambda2 lambda1) (.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1))) (*.f64 (/.f64 (-.f64 phi1 phi2) lambda1) (/.f64 (-.f64 phi1 phi2) lambda1)))) (/.f64 lambda2 lambda1))))
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda1))) lambda1)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) lambda1)))
(* -1 (* lambda1 (+ 1 (* -1 (/ (+ lambda2 (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1)) (* 1/2 (pow (- phi1 phi2) 2))) lambda1))) lambda1)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda2 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda1)) lambda1)))
(sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))
(hypot.f64 lambda1 (-.f64 phi1 phi2))
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 lambda2) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))
(-.f64 (hypot.f64 lambda1 (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))))
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))))))
(+.f64 (hypot.f64 lambda1 (-.f64 phi1 phi2)) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)))) (+.f64 (-.f64 #s(literal 0 binary64) lambda1) (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))))))))))
(+ (sqrt (+ (pow lambda1 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* lambda1 (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))) (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (- 1 (/ (pow lambda1 2) (+ (pow lambda1 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (pow (+ (pow lambda1 2) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (hypot.f64 lambda1 (-.f64 phi1 phi2)) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))) (.f64 (.f64 (.f64 lambda1 lambda2) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)) (.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)))))))))) (.f64 lambda1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))))))))
lambda2
(* lambda2 (+ 1 (* -1 (/ lambda1 lambda2))))
(*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2))))))
(.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2)))))
(* lambda2 (+ 1 (+ (* -1 (/ lambda1 lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3))) (* 1/2 (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))
(.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))))))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1/2 (/ (pow (- phi1 phi2) 2) lambda2))) lambda2)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ (+ lambda1 (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2)) (* 1/2 (pow (- phi1 phi2) 2))) lambda2))) lambda2)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 lambda1 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda1 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 phi2 (-.f64 lambda1 lambda2))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(-.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (.f64 (.f64 phi2 phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (+.f64 (-.f64 #s(literal 0 binary64) phi2) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
(+.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (.f64 phi1 (-.f64 (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))) (.f64 (.f64 (.f64 phi2 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 phi2) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2)))))))))) (.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) (/.f64 #s(literal 1/2 binary64) phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) (pow phi1 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 phi2 phi1) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))) phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (- lambda1 lambda2) 2)) phi1)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 (.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)) phi1)))
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 (-.f64 lambda1 lambda2) phi1)
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))
(-.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (.f64 (.f64 phi2 phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (+.f64 (-.f64 #s(literal 0 binary64) phi1) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (.f64 phi2 (-.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)) (.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1)))))) (.f64 (.f64 phi2 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))))) (.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi1 phi1))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) (pow phi2 3))) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi2 2)))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 phi2 phi2))))))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi2))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi2)) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (- lambda1 lambda2) 2)) phi2)) (* 1/2 (pow (- lambda1 lambda2) 2))) phi2))) phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)) phi2)))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
phi1
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R lambda2)
(*.f64 R lambda2)
(+ (* -1/4 (* R (* lambda2 (* phi1 phi2)))) (* R lambda2))
(+.f64 (.f64 R lambda2) (.f64 (.f64 #s(literal -1/4 binary64) R) (.f64 lambda2 (*.f64 phi2 phi1))))
(+ (* R lambda2) (* phi1 (+ (* -1/4 (* R (* lambda2 phi2))) (* -1/8 (* R (* lambda2 phi1))))))
(+.f64 (.f64 R lambda2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 R lambda2) phi2)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda2) phi1)))))
(+ (* R lambda2) (* phi1 (+ (* -1/4 (* R (* lambda2 phi2))) (* phi1 (+ (* -1/8 (* R lambda2)) (* 1/96 (* R (* lambda2 (* phi1 phi2)))))))))
(+.f64 (.f64 R lambda2) (.f64 phi1 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 R lambda2) phi2)) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 R lambda2)) (.f64 (.f64 (.f64 R lambda2) (.f64 phi2 phi1)) #s(literal 1/96 binary64)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 phi2 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 phi2 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* -1 (* phi2 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
1
#s(literal 1 binary64)
(+ 1 (* -1/4 (* phi1 phi2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))
(+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64)))))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))
(+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 phi1 (+.f64 (.f64 (*.f64 phi2 phi1) #s(literal 1/96 binary64)) #s(literal -1/8 binary64))))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(-.f64 #s(literal 0 binary64) (.f64 phi2 (-.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(-.f64 #s(literal 0 binary64) (.f64 phi2 (-.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(-.f64 #s(literal 0 binary64) (.f64 phi2 (-.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/8 binary64)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/384 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* -1 (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))))
(- (* 1/4 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(-.f64 (.f64 (.f64 #s(literal 1/4 binary64) R) (.f64 lambda1 (.f64 phi2 phi1))) (.f64 (.f64 R lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))))
(- (* phi1 (- (* -1 (* R (* lambda1 (* phi1 (- (* 1/64 (pow phi2 2)) 1/8))))) (* -1/4 (* R (* lambda1 phi2))))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(-.f64 (.f64 phi1 (+.f64 (.f64 (.f64 R lambda1) (neg.f64 (.f64 phi1 (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/64 binary64)) #s(literal -1/8 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 R lambda1) phi2)))) (.f64 (.f64 R lambda1) (+.f64 #s(literal 1 binary64) (.f64 (*.f64 phi2 phi2) #s(literal -1/8 binary64)))))
(- (* phi1 (- (* phi1 (- (* -1/96 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (- (* 1/64 (pow phi2 2)) 1/8))))) (* -1/4 (* R (* lambda1 phi2))))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(-.f64 (.f64 phi1 (+.f64 (.f64 phi1 (-.f64 (.f64 (.f64 #s(literal -1/96 binary64) R) (.f64 lambda1 (.f64 phi2 phi1))) (.f64 R (.f64 lambda1 (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/64 binary64)) #s(literal -1/8 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 R lambda1) phi2)))) (.f64 (.f64 R lambda1) (+.f64 #s(literal 1 binary64) (.f64 (*.f64 phi2 phi2) #s(literal -1/8 binary64)))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(- (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/8 binary64) R) (.f64 (.f64 phi2 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(- (* phi2 (- (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/8 binary64) R) (.f64 (.f64 phi2 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* 1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))
(.f64 (.f64 #s(literal 1/8 binary64) R) (.f64 (.f64 lambda1 (.f64 phi2 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* (pow phi2 2) (- (* 1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* (pow phi2 2) (- (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2))) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))
(.f64 (.f64 phi2 phi2) (+.f64 (-.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 (.f64 phi2 phi2))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2)) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* (pow phi2 2) (- (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2))) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))
(.f64 (.f64 phi2 phi2) (+.f64 (-.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 (.f64 phi2 phi2))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2)) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* 1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))
(.f64 (.f64 #s(literal 1/8 binary64) R) (.f64 (.f64 lambda1 (.f64 phi2 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* (pow phi2 2) (- (* 1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(* (pow phi2 2) (- (* -1 (/ (- (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) phi2)) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* (pow phi2 2) (- (* -1 (/ (- (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (+.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) phi2)) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2)))))
(.f64 (.f64 R lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))))
(+ (* -1/4 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))))
(+.f64 (.f64 (.f64 R lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 R lambda1) (.f64 phi2 phi1))))
(+ (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))) (* phi1 (+ (* -1/4 (* R (* lambda1 phi2))) (* R (* lambda1 (* phi1 (- (* 1/64 (pow phi2 2)) 1/8)))))))
(+.f64 (.f64 (.f64 R lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 phi1 (+.f64 (.f64 R (.f64 (.f64 lambda1 phi1) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/64 binary64)) #s(literal -1/8 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (*.f64 R lambda1) phi2)))))
(+ (* R (* lambda1 (+ 1 (* -1/8 (pow phi2 2))))) (* phi1 (+ (* -1/4 (* R (* lambda1 phi2))) (* phi1 (+ (* 1/96 (* R (* lambda1 (* phi1 phi2)))) (* R (* lambda1 (- (* 1/64 (pow phi2 2)) 1/8))))))))
(+.f64 (.f64 (.f64 R lambda1) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 R lambda1) phi2)) (.f64 phi1 (+.f64 (.f64 R (.f64 lambda1 (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/64 binary64)) #s(literal -1/8 binary64)))) (.f64 #s(literal 1/96 binary64) (.f64 (.f64 R lambda1) (*.f64 phi2 phi1))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal -1/8 binary64) R) (.f64 (.f64 phi2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* R (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal -1/8 binary64) R) (.f64 (.f64 phi2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* -1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))
(.f64 (.f64 #s(literal -1/8 binary64) R) (.f64 (.f64 lambda1 (.f64 phi2 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2)))
(* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 phi2)))))
(* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) (pow phi2 2)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 phi2)))))
(* -1/8 (* R (* lambda1 (* (pow phi2 2) (cos (* 1/2 phi1))))))
(.f64 (.f64 #s(literal -1/8 binary64) R) (.f64 (.f64 lambda1 (.f64 phi2 phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* (pow phi2 2) (+ (* -1/2 (/ (* R (* lambda1 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) phi2)))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) phi2)) phi2)))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) phi2)) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1)))))) phi2)) (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1)))))))
(.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) phi2)) phi2)))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(+ 1 (* -1/8 (pow phi2 2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))
(+ 1 (+ (* -1/4 (* phi1 phi2)) (* -1/8 (pow phi2 2))))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))))
(+ 1 (+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/64 (pow phi2 2)) 1/8))))))
(+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 phi1 (+.f64 (.f64 (*.f64 phi2 phi2) #s(literal 1/64 binary64)) #s(literal -1/8 binary64)))))))
(+ 1 (+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (- (+ (* 1/96 (* phi1 phi2)) (* 1/64 (pow phi2 2))) 1/8))))))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 phi1 (+.f64 (.f64 (.f64 phi2 phi1) #s(literal 1/96 binary64)) (+.f64 (.f64 (*.f64 phi2 phi2) #s(literal 1/64 binary64)) #s(literal -1/8 binary64)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))
(.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (+ (* -1/8 (cos (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) (pow phi2 2)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 phi2)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (+ (* -1/8 (cos (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) (pow phi2 2)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 phi2)))))
(* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))
(.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)) phi2)))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1)))) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (-.f64 (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)) phi2)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi2 2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))
(+ 1 (* (pow phi2 2) (- (* 1/384 (pow phi2 2)) 1/8)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/384 (* -1/46080 (pow phi2 2)))) 1/8)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) (+.f64 #s(literal 1/384 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/4 (* phi1 phi2))
(.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))
(* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))
(.f64 phi1 (.f64 phi2 (+.f64 #s(literal -1/4 binary64) (.f64 #s(literal 1/96 binary64) (.f64 phi1 phi1)))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))
(.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/7680 binary64) (*.f64 phi1 phi1)) #s(literal 1/96 binary64))))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))
(.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 phi2 #s(literal 1/96 binary64)) (.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 #s(literal -1/7680 binary64) (.f64 #s(literal 1/1290240 binary64) (.f64 phi1 phi1)))))))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* -1/48 (pow phi1 2))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 (*.f64 phi1 phi1) #s(literal -1/48 binary64))))
(* phi1 (+ 1/2 (* (pow phi1 2) (- (* 1/3840 (pow phi1 2)) 1/48))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (*.f64 phi1 phi1) #s(literal 1/3840 binary64)) #s(literal -1/48 binary64)))))
(* phi1 (+ 1/2 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/3840 (* -1/645120 (pow phi1 2)))) 1/48))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/3840 binary64) (.f64 (*.f64 phi1 phi1) #s(literal -1/645120 binary64)))) #s(literal -1/48 binary64)))))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 phi2)
(*.f64 phi2 #s(literal -1/8 binary64))
(+ (* -1/8 phi2) (* 1/64 (* (pow phi1 2) phi2)))
(.f64 phi2 (+.f64 #s(literal -1/8 binary64) (.f64 #s(literal 1/64 binary64) (*.f64 phi1 phi1))))
(+ (* -1/8 phi2) (* (pow phi1 2) (+ (* -1/3072 (* (pow phi1 2) phi2)) (* 1/64 phi2))))
(+.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 (.f64 #s(literal -1/3072 binary64) (.f64 phi1 phi1)) #s(literal 1/64 binary64)))))
(+ (* -1/8 phi2) (* (pow phi1 2) (+ (* 1/64 phi2) (* (pow phi1 2) (+ (* -1/3072 phi2) (* 1/368640 (* (pow phi1 2) phi2)))))))
(+.f64 (.f64 phi2 #s(literal -1/8 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 phi2 #s(literal 1/64 binary64)) (.f64 (.f64 phi1 phi1) (.f64 phi2 (+.f64 #s(literal -1/3072 binary64) (.f64 #s(literal 1/368640 binary64) (*.f64 phi1 phi1))))))))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/8 (* phi2 (cos (* 1/2 phi1))))
(.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))
(.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1))))
(.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* (pow phi2 2) (+ (* -1/2 (/ (sin (* 1/2 phi1)) phi2)) (* -1/8 (cos (* 1/2 phi1)))))
(.f64 (.f64 phi2 phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2) (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1/8 (pow phi2 2))
(.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))
(+ (* -1/4 (* phi1 phi2)) (* -1/8 (pow phi2 2)))
(+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))
(+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* 1/64 (* phi1 (pow phi2 2))))))
(+.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 #s(literal 1/64 binary64) (.f64 phi1 (*.f64 phi2 phi2))))))
(+ (* -1/8 (pow phi2 2)) (* phi1 (+ (* -1/4 phi2) (* phi1 (+ (* 1/96 (* phi1 phi2)) (* 1/64 (pow phi2 2)))))))
(+.f64 (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (.f64 phi1 (+.f64 (.f64 (.f64 phi2 phi1) #s(literal 1/96 binary64)) (.f64 (*.f64 phi2 phi2) #s(literal 1/64 binary64)))))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))

eval236.0ms (1.4%)

Compiler: Compiled 39969 to 3238 computations (91.9% saved)

prune322.0ms (1.9%)

Pruning

62 alts after pruning (59 fresh and 3 done)

	Pruned	Kept	Total
New	1277	29	1306
Fresh	10	30	40
Picked	4	1	5
Done	0	2	2
Total	1291	62	1353

Accuracy

98.0%

Counts

1353 → 62

Alt Table

Click to see full alt table

Status	Accuracy	Program
	7.0%	(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))
	23.7%	(-.f64 #s(literal 0 binary64) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 R lambda1)))
	20.8%	(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
	23.7%	(-.f64 #s(literal 0 binary64) (.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 R lambda1)))
	22.0%	(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
	21.4%	(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
	23.9%	(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
	24.5%	(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
	43.8%	(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
	26.8%	(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
	39.4%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
	37.1%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (neg.f64 lambda1))
▶	12.2%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
▶	44.8%	(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
	22.6%	(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (neg.f64 (*.f64 R lambda1)))
	5.9%	(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	22.5%	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
▶	21.7%	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
	23.4%	(.f64 (.f64 R lambda2) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 phi2))))))
✓	22.8%	(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
	23.5%	(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
	23.7%	(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
	20.2%	(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
	20.9%	(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
	7.3%	(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	6.6%	(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
	10.7%	(.f64 (neg.f64 (.f64 R lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
	26.2%	(.f64 (neg.f64 (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
	29.2%	(*.f64 (neg.f64 phi1) R)
	51.9%	(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
	45.8%	(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
	9.0%	(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
	65.0%	(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
▶	82.3%	(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
	82.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
	72.2%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 #s(literal -1/8 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2)))
	73.6%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/8 binary64) phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
	72.9%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal 1/48 binary64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
	69.1%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))
✓	91.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
	74.7%	(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2)))
	74.8%	(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
	24.8%	(.f64 R (hypot.f64 (exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64))) (-.f64 phi1 phi2)))
	72.8%	(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
	47.1%	(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
	22.0%	(.f64 R (.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))
	22.0%	(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
	8.5%	(.f64 R (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
	24.3%	(.f64 R (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) lambda2))
	5.9%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
	23.9%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)))
	22.8%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
	7.3%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
	8.6%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
	24.5%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
	20.9%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
	6.6%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
	41.0%	(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
	37.4%	(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
	58.2%	(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
✓	31.8%	(*.f64 R phi2)
▶	24.0%	(*.f64 R lambda2)

Compiler

Compiled 2581 to 1718 computations (33.4% saved)

simplify286.0ms (1.7%)

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
✓	cost-diff	0	(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
✓	cost-diff	6656	(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
✓	cost-diff	6656	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
✓	cost-diff	0	(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓	cost-diff	0	(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓	cost-diff	0	(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
✓	cost-diff	0	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
✓	cost-diff	128	(+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
✓	cost-diff	128	(/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
✓	cost-diff	128	(-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1))
✓	cost-diff	128	(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
✓	cost-diff	0	(*.f64 R lambda2)
✓	cost-diff	0	(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
✓	cost-diff	256	(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))))
✓	cost-diff	256	(hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2))
✓	cost-diff	256	(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))

Rules

3888×	`-lowering-.f32`
3888×	`-lowering-.f64`
3676×	`+-lowering-+.f64`
3676×	`+-lowering-+.f32`
1658×	`distribute-lft-in`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	46	375
1	114	366
2	349	351
3	1814	351
4	7622	347
0	8463	347

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* R (sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))
(+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(- lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))
(sin (* 1/2 phi1))
(* (* phi2 -1/2) (- lambda1 lambda2))
(* phi2 -1/2)
phi2
-1/2
(- phi1 phi2)
(* R lambda2)
R
lambda2
(* (- 0 phi1) (- R (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)))
(- 0 phi1)
0
phi1
(- R (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1))
R
(/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)
(+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1)))
(* R phi2)
phi2
(* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))
-1/2
(/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1)
(* R (* (- lambda1 lambda2) (- lambda1 lambda2)))
(* (- lambda1 lambda2) (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
(* (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(* R (cos (* 1/2 (+ phi1 phi2))))
R
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
1/2
(+ phi1 phi2)
phi1
phi2
lambda2
(* (- (* R (cos (* 1/2 phi1))) (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2)) (- 0 lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2))
(* R (cos (* 1/2 phi1)))
R
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2)
(* (* R lambda1) (cos (* 1/2 phi1)))
(* R lambda1)
lambda1
lambda2
(- 0 lambda2)
0

Outputs
(* R (sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))
(+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) phi2)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* (* phi2 -1/2) (- lambda1 lambda2))
(.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) phi2))
(* phi2 -1/2)
(*.f64 phi2 #s(literal -1/2 binary64))
phi2
-1/2
#s(literal -1/2 binary64)
(- phi1 phi2)
(-.f64 phi1 phi2)
(* R lambda2)
(*.f64 R lambda2)
R
lambda2
(* (- 0 phi1) (- R (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)))
(.f64 phi1 (-.f64 #s(literal 0 binary64) (-.f64 R (/.f64 (.f64 R (+.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (/.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1)))) phi1))))
(- 0 phi1)
(-.f64 #s(literal 0 binary64) phi1)
0
#s(literal 0 binary64)
phi1
(- R (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1))
(-.f64 R (/.f64 (.f64 R (+.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1)))) phi1))
R
(/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1)))) phi1)
(+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1)))
(.f64 R (+.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi1))))
(* R phi2)
(*.f64 R phi2)
phi2
(* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))
(.f64 (-.f64 lambda1 lambda2) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) phi1))
-1/2
#s(literal -1/2 binary64)
(/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1)
(.f64 R (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))
(* R (* (- lambda1 lambda2) (- lambda1 lambda2)))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* (- lambda1 lambda2) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(* (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
R
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
lambda2
(* (- (* R (cos (* 1/2 phi1))) (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2)) (- 0 lambda2))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 R (/.f64 (*.f64 R lambda1) lambda2)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
R
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2)
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 R lambda1) lambda2))
(* (* R lambda1) (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1))
(* R lambda1)
(*.f64 R lambda1)
lambda1
lambda2
(- 0 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
0
#s(literal 0 binary64)

localize431.0ms (2.6%)

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.8%	(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
✓	accuracy	99.8%	(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓	accuracy	93.5%	(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
✓	accuracy	89.9%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
✓	accuracy	100.0%	(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓	accuracy	99.7%	(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
✓	accuracy	99.7%	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
✓	accuracy	74.5%	(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓	accuracy	93.7%	(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
✓	accuracy	90.7%	(/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
✓	accuracy	88.5%	(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
✓	accuracy	87.1%	(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
✓	accuracy	100.0%	(*.f64 R lambda2)
✓	accuracy	100.0%	(.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))
✓	accuracy	99.7%	(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
✓	accuracy	96.0%	(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
✓	accuracy	93.4%	(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))

Results

258.0ms	178×	1	valid
91.0ms	78×	0	valid

Compiler

Compiled 394 to 44 computations (88.8% saved)

Precisions

Click to see histograms. Total time spent on operations: 208.0ms

ival-mult: 66.0ms (31.7% of total)

ival-add: 39.0ms (18.7% of total)

ival-cos: 35.0ms (16.8% of total)

backward-pass: 15.0ms (7.2% of total)

compiled-spec: 14.0ms (6.7% of total)

ival-sub: 13.0ms (6.2% of total)

ival-sin: 12.0ms (5.8% of total)

ival-div: 9.0ms (4.3% of total)

ival-sqrt: 4.0ms (1.9% of total)

const: 1.0ms (0.5% of total)

series155.0ms (0.9%)

Counts

23 → 972

Calls

Call 1

Inputs
#<alt (* R (sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))>
#<alt (* (- lambda1 lambda2) (cos (* 1/2 phi1)))>
#<alt (* R lambda2)>
#<alt (* (- 0 phi1) (- R (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)))>
#<alt (- R (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1))>
#<alt (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)>
#<alt (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1)))>
#<alt (* (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (* 1/2 (+ phi1 phi2))>
#<alt (* (- (* R (cos (* 1/2 phi1))) (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2)) (- 0 lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (cos (* 1/2 phi1))>
#<alt (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))>
#<alt (* (* phi2 -1/2) (- lambda1 lambda2))>
#<alt (* R (* (- lambda1 lambda2) (- lambda1 lambda2)))>
#<alt (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1)>
#<alt (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2)>
#<alt (* (* R lambda1) (cos (* 1/2 phi1)))>

Outputs
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)))>
#<alt (* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1))))>
#<alt (* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (* R (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda2 (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)))>
#<alt (* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2))))>
#<alt (* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/48 (* phi2 (pow (- lambda1 lambda2) 2))) (* 1/16 (* phi2 (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))>
#<alt (* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))>
#<alt (* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))>
#<alt (* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))>
#<alt (+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/48 (* phi2 (pow (- lambda1 lambda2) 2))) (* 1/16 (* phi2 (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) phi1)) (* 1/2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) phi1))) phi1)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))>
#<alt (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))>
#<alt (* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (- lambda1 lambda2)>
#<alt (- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)>
#<alt (- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)>
#<alt (- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (- lambda1 lambda2)>
#<alt (- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* R phi1)) (* R phi2)))) phi1)>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* R phi1)) (* R phi2)))) phi1)>
#<alt (* -1 (* R phi1))>
#<alt (* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))>
#<alt (* phi1 (+ (* -1 R) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ (* -1 R) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))>
#<alt (* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))>
#<alt (* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))>
#<alt (* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))>
#<alt (* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))>
#<alt (* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))>
#<alt (* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))>
#<alt (* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))>
#<alt (* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))>
#<alt (* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))>
#<alt (* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))>
#<alt (* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))>
#<alt (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))>
#<alt (+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))>
#<alt (+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))>
#<alt (* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))>
#<alt (* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))>
#<alt (* R phi2)>
#<alt (* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))>
#<alt (* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))>
#<alt (* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))>
#<alt (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))))>
#<alt (+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (/ (* R (* lambda1 lambda2)) phi1))>
#<alt (+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))))>
#<alt (+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))))>
#<alt (* -1/2 (/ (* R (pow lambda1 2)) phi1))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda1 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1)))))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda1 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1)))))>
#<alt (* -1/2 (/ (* R (pow lambda1 2)) phi1))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda1)) lambda1)) (* -1/2 (/ R phi1))))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda1)) lambda1)) (* -1/2 (/ R phi1))))>
#<alt (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))))>
#<alt (+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (/ (* R (* lambda1 lambda2)) phi1))>
#<alt (+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))))>
#<alt (+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))))>
#<alt (* -1/2 (/ (* R (pow lambda2 2)) phi1))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda2 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1)))))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda2 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1)))))>
#<alt (* -1/2 (/ (* R (pow lambda2 2)) phi1))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda2)) lambda2)) (* -1/2 (/ R phi1))))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda2)) lambda2)) (* -1/2 (/ R phi1))))>
#<alt (* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))>
#<alt (* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))>
#<alt (* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))>
#<alt (* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))>
#<alt (* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))>
#<alt (* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))>
#<alt (* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))>
#<alt (* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))>
#<alt (* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))>
#<alt (* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))>
#<alt (* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))>
#<alt (* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))>
#<alt (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (* -1 (/ (* R phi2) phi1))>
#<alt (* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))>
#<alt (* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))>
#<alt (* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))>
#<alt (* -1 (/ (* R phi2) phi1))>
#<alt (* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))>
#<alt (* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))>
#<alt (* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))>
#<alt (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))>
#<alt (- (+ R (* -1 (/ (* R (* lambda1 lambda2)) (pow phi1 2)))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))>
#<alt (- (+ R (* lambda1 (- (* 1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))>
#<alt (- (+ R (* lambda1 (- (* 1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))>
#<alt (* 1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))>
#<alt (* (pow lambda1 2) (- (* -1 (/ (* R lambda2) (* lambda1 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* (pow lambda1 2) (- (/ R (pow lambda1 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1)))))))>
#<alt (* (pow lambda1 2) (- (/ R (pow lambda1 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1)))))))>
#<alt (* 1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))>
#<alt (* (pow lambda1 2) (- (* -1 (/ (* R lambda2) (* lambda1 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* (pow lambda1 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda1)) (* -1 (/ (* R lambda2) (pow phi1 2)))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* (pow lambda1 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda1)) (* -1 (/ (* R lambda2) (pow phi1 2)))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))>
#<alt (- (+ R (* -1 (/ (* R (* lambda1 lambda2)) (pow phi1 2)))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))>
#<alt (- (+ R (* lambda2 (- (* 1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))>
#<alt (- (+ R (* lambda2 (- (* 1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))>
#<alt (* 1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))>
#<alt (* (pow lambda2 2) (- (* -1 (/ (* R lambda1) (* lambda2 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* (pow lambda2 2) (- (/ R (pow lambda2 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1)))))))>
#<alt (* (pow lambda2 2) (- (/ R (pow lambda2 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1)))))))>
#<alt (* 1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))>
#<alt (* (pow lambda2 2) (- (* -1 (/ (* R lambda1) (* lambda2 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* (pow lambda2 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda2)) (* -1 (/ (* R lambda1) (pow phi1 2)))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* (pow lambda2 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda2)) (* -1 (/ (* R lambda1) (pow phi1 2)))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (/ (- (* -1 (* R (* phi1 phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))>
#<alt (/ (- (* phi1 (- (* R phi1) (* R phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))>
#<alt (/ (- (* phi1 (- (* R phi1) (* R phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))>
#<alt R>
#<alt (+ R (* -1 (/ (* R phi2) phi1)))>
#<alt (- (+ R (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (/ (* R phi2) phi1))>
#<alt (- (+ R (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (/ (* R phi2) phi1))>
#<alt R>
#<alt (+ R (* -1 (/ (* R phi2) phi1)))>
#<alt (+ R (* -1 (/ (- (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* -1 (* R phi2))) phi1)))>
#<alt (+ R (* -1 (/ (- (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* -1 (* R phi2))) phi1)))>
#<alt (/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)>
#<alt (/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)>
#<alt (/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)>
#<alt (/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)>
#<alt (/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)>
#<alt (/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)>
#<alt (/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)>
#<alt (/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)>
#<alt (* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))>
#<alt (* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))>
#<alt (* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))>
#<alt (* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))>
#<alt (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))>
#<alt (/ (* R phi2) phi1)>
#<alt (* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))>
#<alt (* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))>
#<alt (* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))>
#<alt (/ (* R phi2) phi1)>
#<alt (* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))>
#<alt (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) phi1)>
#<alt (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (/ (* R phi2) phi1) (/ (* R (* lambda1 lambda2)) (pow phi1 2))))>
#<alt (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (* lambda1 (+ (* -1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2)))) (/ (* R phi2) phi1)))>
#<alt (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (* lambda1 (+ (* -1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2)))) (/ (* R phi2) phi1)))>
#<alt (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda2) (* lambda1 (pow phi1 2)))))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1))))))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1))))))>
#<alt (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda2) (* lambda1 (pow phi1 2)))))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda1))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda1))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) phi1)>
#<alt (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (/ (* R phi2) phi1) (/ (* R (* lambda1 lambda2)) (pow phi1 2))))>
#<alt (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (* lambda2 (+ (* -1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2)))) (/ (* R phi2) phi1)))>
#<alt (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (* lambda2 (+ (* -1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2)))) (/ (* R phi2) phi1)))>
#<alt (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda1) (* lambda2 (pow phi1 2)))))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1))))))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1))))))>
#<alt (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda1) (* lambda2 (pow phi1 2)))))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda2))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda2))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))>
#<alt (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))>
#<alt (/ (* R phi2) phi1)>
#<alt (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)>
#<alt (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)>
#<alt (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)>
#<alt (/ (* R phi2) phi1)>
#<alt (* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))>
#<alt (* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))>
#<alt (* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))>
#<alt (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))>
#<alt (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))>
#<alt (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))>
#<alt (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))>
#<alt (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))>
#<alt (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))>
#<alt (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))>
#<alt (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))>
#<alt (* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))>
#<alt (* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))>
#<alt (* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))>
#<alt (* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))>
#<alt (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))>
#<alt (* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))>
#<alt (* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))>
#<alt (* R phi2)>
#<alt (* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))>
#<alt (* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))>
#<alt (* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))>
#<alt (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2))>
#<alt (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (/ (* R (* lambda1 lambda2)) phi1)))>
#<alt (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1)))))>
#<alt (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1)))))>
#<alt (* -1/2 (/ (* R (pow lambda1 2)) phi1))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1))) (+ (/ (* R lambda2) (* lambda1 phi1)) (/ (* R phi2) (pow lambda1 2))))))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1))) (+ (/ (* R lambda2) (* lambda1 phi1)) (/ (* R phi2) (pow lambda1 2))))))>
#<alt (* -1/2 (/ (* R (pow lambda1 2)) phi1))>
#<alt (* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) lambda1))) lambda1)) (* -1/2 (/ R phi1))))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) lambda1))) lambda1)) (* -1/2 (/ R phi1))))>
#<alt (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2))>
#<alt (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (/ (* R (* lambda1 lambda2)) phi1)))>
#<alt (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1)))))>
#<alt (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1)))))>
#<alt (* -1/2 (/ (* R (pow lambda2 2)) phi1))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1))) (+ (/ (* R lambda1) (* lambda2 phi1)) (/ (* R phi2) (pow lambda2 2))))))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1))) (+ (/ (* R lambda1) (* lambda2 phi1)) (/ (* R phi2) (pow lambda2 2))))))>
#<alt (* -1/2 (/ (* R (pow lambda2 2)) phi1))>
#<alt (* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) lambda2))) lambda2)) (* -1/2 (/ R phi1))))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) lambda2))) lambda2)) (* -1/2 (/ R phi1))))>
#<alt (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)>
#<alt (/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)>
#<alt (* R phi2)>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (* R phi2)>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))>
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))>
#<alt (+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 phi2)))>
#<alt (+ (* -1/2 (* R (* phi1 (sin (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))>
#<alt (+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/8 (* R (* phi1 (cos (* 1/2 phi2))))))))>
#<alt (+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* 1/48 (* R (* phi1 (sin (* 1/2 phi2))))))))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* R (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* R (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* R (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (+ (* -1/2 (* R (* phi2 (sin (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))>
#<alt (+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/8 (* R (* phi2 (cos (* 1/2 phi1))))))))>
#<alt (+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* 1/48 (* R (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* R (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* R (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* R (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (cos (* 1/2 phi2))>
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (* 1/2 phi2)>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (* 1/2 phi1)>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* 1/2 phi1)>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* 1/2 phi1)>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (* 1/2 phi2)>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* 1/2 phi2)>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2))))>
#<alt (+ (* -1 (* lambda2 (* (pow phi1 2) (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))))>
#<alt (+ (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))) (* (pow phi1 2) (+ (* -1 (* lambda2 (* (pow phi1 2) (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))))))>
#<alt (+ (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))) (* (pow phi1 2) (+ (* -1 (* lambda2 (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))) (* (pow phi1 2) (+ (* -1 (* lambda2 (* (pow phi1 2) (- (* -1/46080 R) (* -1/46080 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2))))))))))>
#<alt (* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (- R (/ (* R lambda1) lambda2))>
#<alt (- (+ R (* (pow phi1 2) (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))>
#<alt (- (+ R (* (pow phi1 2) (- (+ (* -1/8 R) (* (pow phi1 2) (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2))))) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))>
#<alt (- (+ R (* (pow phi1 2) (- (+ (* -1/8 R) (* (pow phi1 2) (- (+ (* 1/384 R) (* (pow phi1 2) (- (* -1/46080 R) (* -1/46080 (/ (* R lambda1) lambda2))))) (* 1/384 (/ (* R lambda1) lambda2))))) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))>
#<alt (* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))>
#<alt (* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))>
#<alt (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))>
#<alt (/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)>
#<alt (/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)>
#<alt (/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt R>
#<alt (+ R (* -1/8 (* R (pow phi1 2))))>
#<alt (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (+ R (* (pow phi1 2) (+ (* -1/8 R) (* (pow phi1 2) (+ (* -1/46080 (* R (pow phi1 2))) (* 1/384 R))))))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))>
#<alt (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* 1/96 (* (pow phi1 2) (* phi2 (- lambda1 lambda2))))))>
#<alt (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) (* phi2 (- lambda1 lambda2)))) (* 1/96 (* phi2 (- lambda1 lambda2)))))))>
#<alt (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/96 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/7680 (* phi2 (- lambda1 lambda2))) (* 1/1290240 (* (pow phi1 2) (* phi2 (- lambda1 lambda2))))))))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))>
#<alt (* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))>
#<alt (* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))>
#<alt (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (- lambda1 lambda2)))>
#<alt (* 1/2 (* lambda2 phi2))>
#<alt (+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))>
#<alt (+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))>
#<alt (+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))>
#<alt (* -1/2 (* lambda1 phi2))>
#<alt (* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))>
#<alt (* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))>
#<alt (* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))>
#<alt (* -1/2 (* lambda1 phi2))>
#<alt (* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))>
#<alt (* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))>
#<alt (* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))>
#<alt (* -1/2 (* lambda1 phi2))>
#<alt (+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))>
#<alt (+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))>
#<alt (+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))>
#<alt (* 1/2 (* lambda2 phi2))>
#<alt (* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))>
#<alt (* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))>
#<alt (* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))>
#<alt (* 1/2 (* lambda2 phi2))>
#<alt (* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow (- lambda1 lambda2) 2))>
#<alt (* R (pow lambda2 2))>
#<alt (+ (* -2 (* R (* lambda1 lambda2))) (* R (pow lambda2 2)))>
#<alt (+ (* R (pow lambda2 2)) (* lambda1 (+ (* -2 (* R lambda2)) (* R lambda1))))>
#<alt (+ (* R (pow lambda2 2)) (* lambda1 (+ (* -2 (* R lambda2)) (* R lambda1))))>
#<alt (* R (pow lambda1 2))>
#<alt (* (pow lambda1 2) (+ R (* -2 (/ (* R lambda2) lambda1))))>
#<alt (* (pow lambda1 2) (+ R (+ (* -2 (/ (* R lambda2) lambda1)) (/ (* R (pow lambda2 2)) (pow lambda1 2)))))>
#<alt (* (pow lambda1 2) (+ R (+ (* -2 (/ (* R lambda2) lambda1)) (/ (* R (pow lambda2 2)) (pow lambda1 2)))))>
#<alt (* R (pow lambda1 2))>
#<alt (* (pow lambda1 2) (+ R (* -2 (/ (* R lambda2) lambda1))))>
#<alt (* (pow lambda1 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) lambda1)) (* 2 (* R lambda2))) lambda1))))>
#<alt (* (pow lambda1 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) lambda1)) (* 2 (* R lambda2))) lambda1))))>
#<alt (* R (pow lambda1 2))>
#<alt (+ (* -2 (* R (* lambda1 lambda2))) (* R (pow lambda1 2)))>
#<alt (+ (* R (pow lambda1 2)) (* lambda2 (+ (* -2 (* R lambda1)) (* R lambda2))))>
#<alt (+ (* R (pow lambda1 2)) (* lambda2 (+ (* -2 (* R lambda1)) (* R lambda2))))>
#<alt (* R (pow lambda2 2))>
#<alt (* (pow lambda2 2) (+ R (* -2 (/ (* R lambda1) lambda2))))>
#<alt (* (pow lambda2 2) (+ R (+ (* -2 (/ (* R lambda1) lambda2)) (/ (* R (pow lambda1 2)) (pow lambda2 2)))))>
#<alt (* (pow lambda2 2) (+ R (+ (* -2 (/ (* R lambda1) lambda2)) (/ (* R (pow lambda1 2)) (pow lambda2 2)))))>
#<alt (* R (pow lambda2 2))>
#<alt (* (pow lambda2 2) (+ R (* -2 (/ (* R lambda1) lambda2))))>
#<alt (* (pow lambda2 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) lambda2)) (* 2 (* R lambda1))) lambda2))))>
#<alt (* (pow lambda2 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) lambda2)) (* 2 (* R lambda1))) lambda2))))>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow lambda2 2)) phi1)>
#<alt (+ (* -2 (/ (* R (* lambda1 lambda2)) phi1)) (/ (* R (pow lambda2 2)) phi1))>
#<alt (+ (* lambda1 (+ (* -2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))) (/ (* R (pow lambda2 2)) phi1))>
#<alt (+ (* lambda1 (+ (* -2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))) (/ (* R (pow lambda2 2)) phi1))>
#<alt (/ (* R (pow lambda1 2)) phi1)>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (/ R phi1)))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (+ (/ R phi1) (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1)))))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (+ (/ R phi1) (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1)))))>
#<alt (/ (* R (pow lambda1 2)) phi1)>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (/ R phi1)))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) (* lambda1 phi1))) (* 2 (/ (* R lambda2) phi1))) lambda1)) (/ R phi1)))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) (* lambda1 phi1))) (* 2 (/ (* R lambda2) phi1))) lambda1)) (/ R phi1)))>
#<alt (/ (* R (pow lambda1 2)) phi1)>
#<alt (+ (* -2 (/ (* R (* lambda1 lambda2)) phi1)) (/ (* R (pow lambda1 2)) phi1))>
#<alt (+ (* lambda2 (+ (* -2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))) (/ (* R (pow lambda1 2)) phi1))>
#<alt (+ (* lambda2 (+ (* -2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))) (/ (* R (pow lambda1 2)) phi1))>
#<alt (/ (* R (pow lambda2 2)) phi1)>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (/ R phi1)))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (+ (/ R phi1) (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1)))))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (+ (/ R phi1) (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1)))))>
#<alt (/ (* R (pow lambda2 2)) phi1)>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (/ R phi1)))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) (* lambda2 phi1))) (* 2 (/ (* R lambda1) phi1))) lambda2)) (/ R phi1)))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) (* lambda2 phi1))) (* 2 (/ (* R lambda1) phi1))) lambda2)) (/ R phi1)))>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (pow (- lambda1 lambda2) 2)) phi1)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R lambda1) lambda2)>
#<alt (+ (* -1/8 (/ (* R (* lambda1 (pow phi1 2))) lambda2)) (/ (* R lambda1) lambda2))>
#<alt (+ (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda1) lambda2)) (* 1/384 (/ (* R (* lambda1 (pow phi1 2))) lambda2)))) (/ (* R lambda1) lambda2))>
#<alt (+ (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda1) lambda2)) (* (pow phi1 2) (+ (* -1/46080 (/ (* R (* lambda1 (pow phi1 2))) lambda2)) (* 1/384 (/ (* R lambda1) lambda2)))))) (/ (* R lambda1) lambda2))>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R lambda1)>
#<alt (+ (* -1/8 (* R (* lambda1 (pow phi1 2)))) (* R lambda1))>
#<alt (+ (* R lambda1) (* (pow phi1 2) (+ (* -1/8 (* R lambda1)) (* 1/384 (* R (* lambda1 (pow phi1 2)))))))>
#<alt (+ (* R lambda1) (* (pow phi1 2) (+ (* -1/8 (* R lambda1)) (* (pow phi1 2) (+ (* -1/46080 (* R (* lambda1 (pow phi1 2)))) (* 1/384 (* R lambda1)))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>

Calls

243 calls:

Time	Variable		Point	Expression
46.0ms	phi1	@	inf	(/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)
3.0ms	phi2	@	-inf	(/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)
3.0ms	lambda1	@	inf	(+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))
2.0ms	lambda1	@	0	(* R (sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))))
2.0ms	lambda2	@	0	(* R (sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))))

rewrite450.0ms (2.7%)

Algorithm

1×	batch-egg-rewrite

Rules

5080×	`-lowering-.f32`
5080×	`-lowering-.f64`
2712×	`/-lowering-/.f32`
2712×	`/-lowering-/.f64`
1966×	`+-lowering-+.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	46	277
1	244	268
2	2449	265
0	8974	265

Stop Event

1×	iter limit
1×	node limit

Counts

23 → 364

Calls

Call 1

Inputs
(* R (sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))) (+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))) (* (- phi1 phi2) (- phi1 phi2))))
(+ (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(* R lambda2)
(* (- 0 phi1) (- R (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)))
(- R (/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1))
(/ (+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1))) phi1)
(+ (* R phi2) (* -1/2 (/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1)))
(* (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(* R (cos (* 1/2 (+ phi1 phi2))))
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(* (- (* R (cos (* 1/2 phi1))) (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2)) (- 0 lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2))
(* R (cos (* 1/2 phi1)))
(cos (* 1/2 phi1))
(* (sin (* 1/2 phi1)) (* (* phi2 -1/2) (- lambda1 lambda2)))
(* (* phi2 -1/2) (- lambda1 lambda2))
(* R (* (- lambda1 lambda2) (- lambda1 lambda2)))
(/ (* R (* (- lambda1 lambda2) (- lambda1 lambda2))) phi1)
(/ (* (* R lambda1) (cos (* 1/2 phi1))) lambda2)
(* (* R lambda1) (cos (* 1/2 phi1)))

Outputs
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
(.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)) R)
(exp.f64 (.f64 (log.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 6 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))))
(/.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 6 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))
(pow.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (hypot.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64))))))))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 4 binary64)) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(-.f64 (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) (/.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))))
(fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 phi2 (.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (*.f64 phi2 #s(literal -1/2 binary64))))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))))))) (neg.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))))
(/.f64 (-.f64 (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (+.f64 lambda1 lambda2) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (.f64 (+.f64 lambda1 lambda2) (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(pow.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (*.f64 phi2 #s(literal -1/2 binary64))))))) #s(literal -1 binary64))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(.f64 (-.f64 lambda1 lambda2) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (-.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 1 binary64)))
(.f64 (-.f64 lambda1 lambda2) (pow.f64 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))
(.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64)))))) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) #s(literal 3 binary64))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64)))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))) #s(literal 1 binary64)))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(*.f64 R lambda2)
(*.f64 lambda2 R)
(+.f64 (.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) #s(literal 0 binary64)) (neg.f64 (.f64 phi1 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) R) (.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1))))
(+.f64 (.f64 #s(literal 0 binary64) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))) (neg.f64 (.f64 phi1 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))))
(+.f64 (.f64 R (-.f64 #s(literal 0 binary64) phi1)) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 R (-.f64 #s(literal 0 binary64) phi1) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 #s(literal 0 binary64) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) (neg.f64 (.f64 phi1 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))))
(fma.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) #s(literal 0 binary64) (neg.f64 (.f64 phi1 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))))
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) R (.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1))))
(neg.f64 (.f64 phi1 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))
(neg.f64 (.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) phi1))
(/.f64 (.f64 (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1)))) (.f64 (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))) (.f64 phi1 phi1)))
(/.f64 (.f64 (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) (.f64 phi1 phi1))) (.f64 (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))) phi1))
(/.f64 (.f64 (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1)))) (.f64 (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) (*.f64 phi1 phi1)))
(/.f64 (.f64 (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 0 binary64) (.f64 phi1 phi1))) (.f64 (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) phi1))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1))) (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1))))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1))) (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) (.f64 (.f64 phi1 phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 phi1 phi1)) (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1))))) (.f64 phi1 (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 phi1 phi1)) (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) (.f64 phi1 (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))
(/.f64 (.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1)))) (*.f64 phi1 phi1))
(/.f64 (.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1)
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))
(/.f64 (.f64 (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))))
(/.f64 (.f64 (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1))) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))) (*.f64 phi1 phi1))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 phi1 phi1)) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))) phi1)
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))
(+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1)) R)
(-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))
(-.f64 (/.f64 (.f64 R (.f64 R R)) (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))) (/.f64 (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1))) (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))))
(-.f64 (/.f64 (.f64 R R) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))) (/.f64 (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))
(fma.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (neg.f64 (/.f64 #s(literal 1 binary64) phi1)) R)
(fma.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) phi1) R)
(fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) R)
(/.f64 (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1)))) (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))))
(/.f64 (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1)))) (+.f64 (.f64 R R) (-.f64 (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))) (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (*.f64 phi1 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))
(/.f64 (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))
(/.f64 (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (neg.f64 (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1))))) (neg.f64 (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))))
(/.f64 (neg.f64 (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) (neg.f64 (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))
(pow.f64 (/.f64 (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)))) (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (*.f64 phi1 phi1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)) (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))) #s(literal -1 binary64))
(.f64 (-.f64 (.f64 R (.f64 R R)) (/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 phi1 (.f64 phi1 phi1)))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 R R) (.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))))
(.f64 (-.f64 (.f64 R R) (/.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (/.f64 #s(literal 1 binary64) (+.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))))
(exp.f64 (.f64 (log.f64 (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1)
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 0 binary64) phi1))
(/.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) (.f64 phi1 (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 R phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))) (.f64 phi1 (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))
(/.f64 (.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) #s(literal 1 binary64)) (.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 R phi2)))) phi1))
(/.f64 (.f64 (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))) #s(literal 1 binary64)) (.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))) phi1))
(/.f64 (.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) #s(literal 1 binary64)) phi1)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) (/.f64 #s(literal 1 binary64) phi1)) (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 R phi2)))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))) (/.f64 #s(literal 1 binary64) phi1)) (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(pow.f64 (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 phi1 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (/.f64 #s(literal 1 binary64) phi1))
(.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)))
(.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi1))
(.f64 (/.f64 #s(literal 1 binary64) phi1) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(.f64 (/.f64 #s(literal 1 binary64) phi1) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) #s(literal -1 binary64)))
(.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1)))) (*.f64 phi1 phi1))
(.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1)
(.f64 (pow.f64 (/.f64 phi1 (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 R phi2))))))
(.f64 (pow.f64 (/.f64 phi1 (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(+.f64 (.f64 R phi2) (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(+.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 R phi2))
(-.f64 (/.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(fma.f64 R phi2 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(fma.f64 R (.f64 (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) #s(literal -1/2 binary64)) (*.f64 R phi2))
(fma.f64 phi2 R (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 R phi2))
(fma.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (/.f64 #s(literal 1 binary64) phi1) #s(literal -1/2 binary64)) (.f64 R phi2))
(fma.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) #s(literal -1/2 binary64) (*.f64 R phi2))
(fma.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) phi1) (.f64 R phi2))
(fma.f64 (.f64 #s(literal -1/2 binary64) R) (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) (*.f64 R phi2))
(/.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 R phi2)))))
(/.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (/.f64 (.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 R phi2)))) (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))))
(/.f64 (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))) (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))) (neg.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 R phi2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) (neg.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(/.f64 (-.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (.f64 (.f64 R phi2) (.f64 R phi2))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 R phi2)))
(pow.f64 (/.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 R phi2)))) (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) #s(literal -1 binary64))
(.f64 (+.f64 (.f64 (.f64 R phi2) (.f64 (.f64 R phi2) (.f64 R phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 R phi2))))))
(.f64 (-.f64 (.f64 (.f64 R phi2) (.f64 R phi2)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 R phi2) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 R (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(.f64 lambda2 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(.f64 (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) R)
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R)
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi2))
(+.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 #s(literal 1/2 binary64) phi2 (*.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 phi2 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))
(/.f64 (+.f64 (.f64 (.f64 phi1 (.f64 phi1 phi1)) #s(literal 1/8 binary64)) (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal 1/2 binary64) phi2) (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 (.f64 #s(literal 1/2 binary64) phi1) (.f64 #s(literal 1/2 binary64) phi2)))
(/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2))
(/.f64 (.f64 (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) #s(literal 1/2 binary64)) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (.f64 (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
(+.f64 (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) #s(literal 0 binary64)) (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2))))
(+.f64 (.f64 #s(literal 0 binary64) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))) (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 #s(literal 0 binary64) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) #s(literal 0 binary64) (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2))))
(neg.f64 (.f64 lambda2 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))
(neg.f64 (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) lambda2))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 (.f64 lambda2 lambda2)))) (.f64 (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))) (.f64 lambda2 lambda2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))) (.f64 (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))) lambda2))
(/.f64 (.f64 (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 (.f64 lambda2 lambda2)))) (.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (.f64 lambda2 lambda2)))
(/.f64 (.f64 (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))) (.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) lambda2))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 (.f64 lambda2 lambda2))) (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64)))) (.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 (.f64 lambda2 lambda2))) (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64)))) (.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64)))) (.f64 lambda2 (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64)))) (.f64 lambda2 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))
(/.f64 (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) (.f64 lambda2 (.f64 lambda2 lambda2)))) (*.f64 lambda2 lambda2))
(/.f64 (.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2))) lambda2)
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64)))) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64)))) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))
(/.f64 (.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))))
(/.f64 (.f64 (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 (.f64 lambda2 lambda2))) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))) (*.f64 lambda2 lambda2))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2))) lambda2)
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))
(+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (+.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2)) (.f64 R lambda1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2)))
(+.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (+.f64 (.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))
(+.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2))
(-.f64 (/.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))) (/.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64)) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2))))))
(-.f64 (/.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))) (/.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64)) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))
(fma.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) R (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (.f64 R lambda1) (neg.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2)) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) (neg.f64 (/.f64 #s(literal 1 binary64) lambda2)) (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1))) (/.f64 #s(literal 1 binary64) lambda2) (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))) (+.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2)) (.f64 R lambda1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2)))
(fma.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))) (+.f64 (.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))) (+.f64 (.f64 (neg.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2)) (.f64 R lambda1)) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2)))
(fma.f64 (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))) (+.f64 (.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))
(fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (neg.f64 (.f64 R lambda1)) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2)))))
(/.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64)) (.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))) (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2) #s(literal 2 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64))) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64)))) (neg.f64 (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64)))) (neg.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2))))
(pow.f64 (/.f64 (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)))) (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2)) (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 (-.f64 (pow.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))))
(.f64 (-.f64 (.f64 (.f64 R R) (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (pow.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) R)
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) lambda1) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 lambda1 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64)))))
(fma.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) lambda1 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))))
(.f64 phi2 (.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))) (-.f64 lambda1 lambda2))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 phi2 #s(literal -1/2 binary64)))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) phi2) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(+.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) lambda1) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 (.f64 phi2 #s(literal -1/2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 phi2 #s(literal -1/2 binary64))))
(fma.f64 lambda1 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 phi2 #s(literal -1/2 binary64))))
(fma.f64 (.f64 phi2 #s(literal -1/2 binary64)) lambda1 (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 phi2 #s(literal -1/2 binary64))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (.f64 phi2 #s(literal -1/2 binary64))) (+.f64 lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (.f64 phi2 #s(literal -1/2 binary64)))
(.f64 phi2 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 (-.f64 lambda1 lambda2)))
(.f64 (.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2))
(.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) phi2)
(.f64 (.f64 (-.f64 lambda1 lambda2) phi2) #s(literal -1/2 binary64))
(+.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) lambda1) (.f64 (.f64 R (-.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 (.f64 R (-.f64 lambda1 lambda2))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 R (-.f64 lambda1 lambda2))))
(fma.f64 lambda1 (.f64 R (-.f64 lambda1 lambda2)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (-.f64 lambda1 lambda2))))
(fma.f64 (.f64 R (-.f64 lambda1 lambda2)) lambda1 (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 (.f64 R (-.f64 lambda1 lambda2)) (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(.f64 (-.f64 lambda1 lambda2) (.f64 R (-.f64 lambda1 lambda2)))
(.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) R)
(.f64 (.f64 R (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2))
(exp.f64 (.f64 (log.f64 (/.f64 phi1 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) phi1)))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 0 binary64) phi1))
(/.f64 #s(literal 1 binary64) (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (neg.f64 (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)) phi1)
(pow.f64 (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 phi1 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 R (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))
(.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 R (/.f64 #s(literal 1 binary64) phi1)))
(.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (/.f64 R phi1))
(.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) phi1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)))
(.f64 #s(literal 1 binary64) (.f64 (*.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1)))
(.f64 (/.f64 #s(literal 1 binary64) phi1) (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(.f64 (/.f64 #s(literal 1 binary64) phi1) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal -1 binary64)))
(.f64 (.f64 R (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) phi1)))
(.f64 (.f64 R (-.f64 lambda1 lambda2)) (/.f64 (-.f64 lambda1 lambda2) phi1))
(.f64 (/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1) R)
(.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1)))) (.f64 phi1 phi1))
(.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 #s(literal 0 binary64) (.f64 phi1 phi1))) phi1)
(exp.f64 (.f64 (log.f64 (/.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)) lambda2)
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1))) (-.f64 #s(literal 0 binary64) lambda2))
(/.f64 #s(literal 1 binary64) (/.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)))))
(/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) #s(literal 1 binary64)) lambda2)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1)))) (neg.f64 (-.f64 #s(literal 0 binary64) lambda2)))
(pow.f64 (/.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 R (.f64 lambda1 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2)))
(.f64 R (.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 #s(literal 1 binary64) lambda2)))
(.f64 R (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(.f64 lambda1 (.f64 R (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 R lambda1) (/.f64 #s(literal 1 binary64) lambda2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 R lambda1) lambda2))
(.f64 (.f64 R lambda1) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) (/.f64 #s(literal 1 binary64) lambda2))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)) lambda2))
(.f64 (/.f64 #s(literal 1 binary64) lambda2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1)))
(.f64 (/.f64 #s(literal 1 binary64) lambda2) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1))) #s(literal -1 binary64)))
(.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda2) (*.f64 R lambda1))
(.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 (.f64 lambda2 lambda2)))) (*.f64 lambda2 lambda2))
(.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 R lambda1))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2))) lambda2)
(.f64 R (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 lambda1 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda1))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1)
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) R)

simplify595.0ms (3.5%)

Algorithm

1×	egg-herbie

Rules

7134×	`-lowering-.f32`
7134×	`-lowering-.f64`
2948×	`+-lowering-+.f64`
2948×	`+-lowering-+.f32`
1638×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1526	22044
1	5631	21281
0	8126	21281

Stop Event

1×	iter limit
1×	node limit

Counts

972 → 972

Calls

Call 1

Inputs
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)))
(* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1))))
(* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)))))
(* -1 (* R (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))
(+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))
(+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))
(+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))
(* R (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda2 (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)))
(* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2))))
(* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)))))
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/48 (* phi2 (pow (- lambda1 lambda2) 2))) (* 1/16 (* phi2 (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))
(+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))
(+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/48 (* phi2 (pow (- lambda1 lambda2) 2))) (* 1/16 (* phi2 (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) phi1)) (* 1/2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) phi1))) phi1)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))
(* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))
(* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(- lambda1 lambda2)
(- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(* lambda1 (cos (* 1/2 phi1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (cos (* 1/2 phi1)))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (cos (* 1/2 phi1)))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(- lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* R phi1)) (* R phi2)))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* R phi1)) (* R phi2)))) phi1)
(* -1 (* R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))))
(* phi1 (+ (* -1 R) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))
(* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))
(* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))
(* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))
(* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))
(+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))
(+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(* R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (/ (* R (* lambda1 lambda2)) phi1))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))))
(* -1/2 (/ (* R (pow lambda1 2)) phi1))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))
(* (pow lambda1 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda1 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1)))))
(* (pow lambda1 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda1 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1)))))
(* -1/2 (/ (* R (pow lambda1 2)) phi1))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda1)) lambda1)) (* -1/2 (/ R phi1))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda1)) lambda1)) (* -1/2 (/ R phi1))))
(* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (/ (* R (* lambda1 lambda2)) phi1))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))))
(* -1/2 (/ (* R (pow lambda2 2)) phi1))
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))
(* (pow lambda2 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda2 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1)))))
(* (pow lambda2 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda2 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1)))))
(* -1/2 (/ (* R (pow lambda2 2)) phi1))
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda2)) lambda2)) (* -1/2 (/ R phi1))))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda2)) lambda2)) (* -1/2 (/ R phi1))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(* -1 (/ (* R phi2) phi1))
(* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))
(* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))
(* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))
(* -1 (/ (* R phi2) phi1))
(* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))
(* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))
(* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))
(- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(- (+ R (* -1 (/ (* R (* lambda1 lambda2)) (pow phi1 2)))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(- (+ R (* lambda1 (- (* 1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(- (+ R (* lambda1 (- (* 1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(* 1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))
(* (pow lambda1 2) (- (* -1 (/ (* R lambda2) (* lambda1 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))
(* (pow lambda1 2) (- (/ R (pow lambda1 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1)))))))
(* (pow lambda1 2) (- (/ R (pow lambda1 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1)))))))
(* 1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))
(* (pow lambda1 2) (- (* -1 (/ (* R lambda2) (* lambda1 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))
(* (pow lambda1 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda1)) (* -1 (/ (* R lambda2) (pow phi1 2)))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))
(* (pow lambda1 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda1)) (* -1 (/ (* R lambda2) (pow phi1 2)))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))
(- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(- (+ R (* -1 (/ (* R (* lambda1 lambda2)) (pow phi1 2)))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(- (+ R (* lambda2 (- (* 1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(- (+ R (* lambda2 (- (* 1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(* 1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))
(* (pow lambda2 2) (- (* -1 (/ (* R lambda1) (* lambda2 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))
(* (pow lambda2 2) (- (/ R (pow lambda2 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1)))))))
(* (pow lambda2 2) (- (/ R (pow lambda2 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1)))))))
(* 1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))
(* (pow lambda2 2) (- (* -1 (/ (* R lambda1) (* lambda2 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))
(* (pow lambda2 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda2)) (* -1 (/ (* R lambda1) (pow phi1 2)))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))
(* (pow lambda2 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda2)) (* -1 (/ (* R lambda1) (pow phi1 2)))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))
(* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(/ (- (* -1 (* R (* phi1 phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))
(/ (- (* phi1 (- (* R phi1) (* R phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))
(/ (- (* phi1 (- (* R phi1) (* R phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))
R
(+ R (* -1 (/ (* R phi2) phi1)))
(- (+ R (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (/ (* R phi2) phi1))
(- (+ R (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (/ (* R phi2) phi1))
R
(+ R (* -1 (/ (* R phi2) phi1)))
(+ R (* -1 (/ (- (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* -1 (* R phi2))) phi1)))
(+ R (* -1 (/ (- (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* -1 (* R phi2))) phi1)))
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))
(* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))
(* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))
(* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))
(/ (* R phi2) phi1)
(* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))
(* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))
(* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))
(/ (* R phi2) phi1)
(* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))
(* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))
(* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))
(/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) phi1)
(+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (/ (* R phi2) phi1) (/ (* R (* lambda1 lambda2)) (pow phi1 2))))
(+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (* lambda1 (+ (* -1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2)))) (/ (* R phi2) phi1)))
(+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (* lambda1 (+ (* -1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2)))) (/ (* R phi2) phi1)))
(* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))
(* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda2) (* lambda1 (pow phi1 2)))))
(* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1))))))
(* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1))))))
(* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))
(* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda2) (* lambda1 (pow phi1 2)))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda1))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda1))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))
(/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) phi1)
(+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (/ (* R phi2) phi1) (/ (* R (* lambda1 lambda2)) (pow phi1 2))))
(+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (* lambda2 (+ (* -1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2)))) (/ (* R phi2) phi1)))
(+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (* lambda2 (+ (* -1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2)))) (/ (* R phi2) phi1)))
(* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))
(* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda1) (* lambda2 (pow phi1 2)))))
(* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1))))))
(* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1))))))
(* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))
(* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda1) (* lambda2 (pow phi1 2)))))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda2))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda2))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))
(/ (* R phi2) phi1)
(/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)
(/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)
(/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)
(/ (* R phi2) phi1)
(* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))
(* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))
(* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))
(* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))
(* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))
(* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(* R phi2)
(* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))
(* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))
(* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))
(* R phi2)
(* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))
(* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))
(* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))
(+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2))
(+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (/ (* R (* lambda1 lambda2)) phi1)))
(+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1)))))
(+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1)))))
(* -1/2 (/ (* R (pow lambda1 2)) phi1))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1))) (+ (/ (* R lambda2) (* lambda1 phi1)) (/ (* R phi2) (pow lambda1 2))))))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1))) (+ (/ (* R lambda2) (* lambda1 phi1)) (/ (* R phi2) (pow lambda1 2))))))
(* -1/2 (/ (* R (pow lambda1 2)) phi1))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) lambda1))) lambda1)) (* -1/2 (/ R phi1))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) lambda1))) lambda1)) (* -1/2 (/ R phi1))))
(+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2))
(+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (/ (* R (* lambda1 lambda2)) phi1)))
(+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1)))))
(+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1)))))
(* -1/2 (/ (* R (pow lambda2 2)) phi1))
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1))) (+ (/ (* R lambda1) (* lambda2 phi1)) (/ (* R phi2) (pow lambda2 2))))))
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1))) (+ (/ (* R lambda1) (* lambda2 phi1)) (/ (* R phi2) (pow lambda2 2))))))
(* -1/2 (/ (* R (pow lambda2 2)) phi1))
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) lambda2))) lambda2)) (* -1/2 (/ R phi1))))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) lambda2))) lambda2)) (* -1/2 (/ R phi1))))
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)
(* R phi2)
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(* R phi2)
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 phi2)))
(+ (* -1/2 (* R (* phi1 (sin (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/8 (* R (* phi1 (cos (* 1/2 phi2))))))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* 1/48 (* R (* phi1 (sin (* 1/2 phi2))))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 phi1)))
(+ (* -1/2 (* R (* phi2 (sin (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/8 (* R (* phi2 (cos (* 1/2 phi1))))))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* 1/48 (* R (* phi2 (sin (* 1/2 phi1))))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(* 1/2 phi2)
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(* 1/2 phi2)
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* 1/2 phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (- R (/ (* R lambda1) lambda2))))
(+ (* -1 (* lambda2 (* (pow phi1 2) (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))))
(+ (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))) (* (pow phi1 2) (+ (* -1 (* lambda2 (* (pow phi1 2) (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))))))
(+ (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))) (* (pow phi1 2) (+ (* -1 (* lambda2 (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))) (* (pow phi1 2) (+ (* -1 (* lambda2 (* (pow phi1 2) (- (* -1/46080 R) (* -1/46080 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2))))))))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(- R (/ (* R lambda1) lambda2))
(- (+ R (* (pow phi1 2) (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))
(- (+ R (* (pow phi1 2) (- (+ (* -1/8 R) (* (pow phi1 2) (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2))))) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))
(- (+ R (* (pow phi1 2) (- (+ (* -1/8 R) (* (pow phi1 2) (- (+ (* 1/384 R) (* (pow phi1 2) (- (* -1/46080 R) (* -1/46080 (/ (* R lambda1) lambda2))))) (* 1/384 (/ (* R lambda1) lambda2))))) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(* R (cos (* 1/2 phi1)))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))
(* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))
(* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))
(* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))
(* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)
(/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)
(/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)
(* R (cos (* 1/2 phi1)))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(* R (cos (* 1/2 phi1)))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
R
(+ R (* -1/8 (* R (pow phi1 2))))
(+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(+ R (* (pow phi1 2) (+ (* -1/8 R) (* (pow phi1 2) (+ (* -1/46080 (* R (pow phi1 2))) (* 1/384 R))))))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
(* R (cos (* 1/2 phi1)))
1
(+ 1 (* -1/8 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))
(* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* 1/96 (* (pow phi1 2) (* phi2 (- lambda1 lambda2))))))
(* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) (* phi2 (- lambda1 lambda2)))) (* 1/96 (* phi2 (- lambda1 lambda2)))))))
(* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/96 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/7680 (* phi2 (- lambda1 lambda2))) (* 1/1290240 (* (pow phi1 2) (* phi2 (- lambda1 lambda2))))))))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))
(* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))
(* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))
(* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))
(* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))
(* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))
(* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))
(* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))
(* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(* 1/2 (* lambda2 phi2))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(* -1/2 (* lambda1 phi2))
(* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))
(* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))
(* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))
(* -1/2 (* lambda1 phi2))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))
(* -1/2 (* lambda1 phi2))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(* 1/2 (* lambda2 phi2))
(* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))
(* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))
(* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))
(* 1/2 (* lambda2 phi2))
(* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))
(* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))
(* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow (- lambda1 lambda2) 2))
(* R (pow lambda2 2))
(+ (* -2 (* R (* lambda1 lambda2))) (* R (pow lambda2 2)))
(+ (* R (pow lambda2 2)) (* lambda1 (+ (* -2 (* R lambda2)) (* R lambda1))))
(+ (* R (pow lambda2 2)) (* lambda1 (+ (* -2 (* R lambda2)) (* R lambda1))))
(* R (pow lambda1 2))
(* (pow lambda1 2) (+ R (* -2 (/ (* R lambda2) lambda1))))
(* (pow lambda1 2) (+ R (+ (* -2 (/ (* R lambda2) lambda1)) (/ (* R (pow lambda2 2)) (pow lambda1 2)))))
(* (pow lambda1 2) (+ R (+ (* -2 (/ (* R lambda2) lambda1)) (/ (* R (pow lambda2 2)) (pow lambda1 2)))))
(* R (pow lambda1 2))
(* (pow lambda1 2) (+ R (* -2 (/ (* R lambda2) lambda1))))
(* (pow lambda1 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) lambda1)) (* 2 (* R lambda2))) lambda1))))
(* (pow lambda1 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) lambda1)) (* 2 (* R lambda2))) lambda1))))
(* R (pow lambda1 2))
(+ (* -2 (* R (* lambda1 lambda2))) (* R (pow lambda1 2)))
(+ (* R (pow lambda1 2)) (* lambda2 (+ (* -2 (* R lambda1)) (* R lambda2))))
(+ (* R (pow lambda1 2)) (* lambda2 (+ (* -2 (* R lambda1)) (* R lambda2))))
(* R (pow lambda2 2))
(* (pow lambda2 2) (+ R (* -2 (/ (* R lambda1) lambda2))))
(* (pow lambda2 2) (+ R (+ (* -2 (/ (* R lambda1) lambda2)) (/ (* R (pow lambda1 2)) (pow lambda2 2)))))
(* (pow lambda2 2) (+ R (+ (* -2 (/ (* R lambda1) lambda2)) (/ (* R (pow lambda1 2)) (pow lambda2 2)))))
(* R (pow lambda2 2))
(* (pow lambda2 2) (+ R (* -2 (/ (* R lambda1) lambda2))))
(* (pow lambda2 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) lambda2)) (* 2 (* R lambda1))) lambda2))))
(* (pow lambda2 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) lambda2)) (* 2 (* R lambda1))) lambda2))))
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow lambda2 2)) phi1)
(+ (* -2 (/ (* R (* lambda1 lambda2)) phi1)) (/ (* R (pow lambda2 2)) phi1))
(+ (* lambda1 (+ (* -2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))) (/ (* R (pow lambda2 2)) phi1))
(+ (* lambda1 (+ (* -2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))) (/ (* R (pow lambda2 2)) phi1))
(/ (* R (pow lambda1 2)) phi1)
(* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (/ R phi1)))
(* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (+ (/ R phi1) (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1)))))
(* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (+ (/ R phi1) (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1)))))
(/ (* R (pow lambda1 2)) phi1)
(* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (/ R phi1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) (* lambda1 phi1))) (* 2 (/ (* R lambda2) phi1))) lambda1)) (/ R phi1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) (* lambda1 phi1))) (* 2 (/ (* R lambda2) phi1))) lambda1)) (/ R phi1)))
(/ (* R (pow lambda1 2)) phi1)
(+ (* -2 (/ (* R (* lambda1 lambda2)) phi1)) (/ (* R (pow lambda1 2)) phi1))
(+ (* lambda2 (+ (* -2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))) (/ (* R (pow lambda1 2)) phi1))
(+ (* lambda2 (+ (* -2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))) (/ (* R (pow lambda1 2)) phi1))
(/ (* R (pow lambda2 2)) phi1)
(* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (/ R phi1)))
(* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (+ (/ R phi1) (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1)))))
(* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (+ (/ R phi1) (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1)))))
(/ (* R (pow lambda2 2)) phi1)
(* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (/ R phi1)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) (* lambda2 phi1))) (* 2 (/ (* R lambda1) phi1))) lambda2)) (/ R phi1)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) (* lambda2 phi1))) (* 2 (/ (* R lambda1) phi1))) lambda2)) (/ R phi1)))
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R lambda1) lambda2)
(+ (* -1/8 (/ (* R (* lambda1 (pow phi1 2))) lambda2)) (/ (* R lambda1) lambda2))
(+ (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda1) lambda2)) (* 1/384 (/ (* R (* lambda1 (pow phi1 2))) lambda2)))) (/ (* R lambda1) lambda2))
(+ (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda1) lambda2)) (* (pow phi1 2) (+ (* -1/46080 (/ (* R (* lambda1 (pow phi1 2))) lambda2)) (* 1/384 (/ (* R lambda1) lambda2)))))) (/ (* R lambda1) lambda2))
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R lambda1)
(+ (* -1/8 (* R (* lambda1 (pow phi1 2)))) (* R lambda1))
(+ (* R lambda1) (* (pow phi1 2) (+ (* -1/8 (* R lambda1)) (* 1/384 (* R (* lambda1 (pow phi1 2)))))))
(+ (* R lambda1) (* (pow phi1 2) (+ (* -1/8 (* R lambda1)) (* (pow phi1 2) (+ (* -1/46080 (* R (* lambda1 (pow phi1 2)))) (* 1/384 (* R lambda1)))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))

Outputs
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 phi1 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 phi1 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 phi1 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 (.f64 R lambda1) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 R (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 phi1 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 lambda1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 R (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 R lambda1) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda1) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda1 (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)))
(.f64 lambda1 (+.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1)))
(* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1))))
(.f64 lambda1 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 lambda1))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (/.f64 (.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)))
(* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)))))
(.f64 lambda1 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 lambda1))) (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (/.f64 (.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 lambda1 (*.f64 lambda1 lambda1)))))))
(* -1 (* R (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda1)) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (+.f64 (.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda1 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (-.f64 (.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 R (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 lambda1 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) lambda1)) (neg.f64 lambda1))
(* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 phi1 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 phi1 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 R (.f64 (.f64 lambda2 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 phi1 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 (.f64 R lambda2) (-.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 (.f64 R (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(+ (* R (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (.f64 R (hypot.f64 (-.f64 phi1 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 lambda2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (.f64 (.f64 R (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 R lambda2) (.f64 (.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))))))))
(* R (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (.f64 R lambda2) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)))
(.f64 lambda2 (+.f64 (.f64 R (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 R (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)))
(* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2))))
(.f64 lambda2 (+.f64 (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 R (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 R (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)))
(* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* R (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)))))
(.f64 lambda2 (+.f64 (+.f64 (+.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 R (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 R (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 lambda2 (.f64 lambda2 lambda2))))))
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 R (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (+.f64 (.f64 R (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(.f64 (-.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (-.f64 (.f64 R (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 R lambda2) (/.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2)))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+.f64 (.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R phi1) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 (.f64 R phi1) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi2 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 R (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ (* 1/48 (* phi2 (pow (- lambda1 lambda2) 2))) (* 1/16 (* phi2 (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 (.f64 R phi1) (+.f64 (.f64 (.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 1/12 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi2 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi2 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 phi2 phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (*.f64 phi1 phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 2)))))))
(.f64 phi1 (+.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 R phi2) (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (.f64 R (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (/.f64 (*.f64 R phi2) phi1))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) phi1))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 R phi2) (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) phi1))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R phi2) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (.f64 R phi2) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 R (.f64 (.f64 (.f64 phi2 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))))))
(* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(.f64 (.f64 R phi2) (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))
(.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (.f64 R (-.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 phi2)))))))
(* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(.f64 phi2 (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (.f64 R (-.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 phi2)))))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (.f64 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (-.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 (.f64 phi2 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))))))
(* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) (.f64 R phi2)))
(* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(.f64 (+.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (.f64 R (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64)))) phi2)))) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(.f64 (-.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(.f64 (-.f64 (.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 R (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))
(hypot.f64 (-.f64 phi1 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))
(+.f64 (hypot.f64 (-.f64 phi1 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 lambda1 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (hypot.f64 (-.f64 phi1 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))) (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2)) (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (hypot.f64 (-.f64 phi1 phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda1 (+.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (.f64 (.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 lambda1 lambda1))) (/.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) lambda1)) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))
(hypot.f64 (-.f64 phi1 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))
(+.f64 (hypot.f64 (-.f64 phi1 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (.f64 lambda2 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (hypot.f64 (-.f64 phi1 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))))) (.f64 (.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))
(+ (sqrt (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2)) (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) (sqrt (/ 1 (+ (pow (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (hypot.f64 (-.f64 phi1 phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (+.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda2 (.f64 (.f64 (.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (/.f64 (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))))))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda2 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 lambda2 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2) (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))))
(.f64 lambda2 (-.f64 (+.f64 (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) (+.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 lambda2))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))))
(.f64 lambda2 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2) (+.f64 (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 lambda2))))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (pow.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (.f64 lambda2 (.f64 lambda2 lambda2)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 lambda2 (pow.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 phi2 (-.f64 lambda1 lambda2))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi2 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (+ (* 1/48 (* phi2 (pow (- lambda1 lambda2) 2))) (* 1/16 (* phi2 (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (+ (* -1/4 (pow (- lambda1 lambda2) 2)) (* 1/16 (* (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi2 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 1/12 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64))) (.f64 (.f64 #s(literal 1/16 binary64) (.f64 phi2 phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (+.f64 (.f64 phi2 phi2) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (/.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (*.f64 phi1 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) (pow phi1 2)))))))
(.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 phi2 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (.f64 phi1 phi1)))) (/.f64 phi2 phi1))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) phi1)) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2)) phi1)) (* 1/2 (pow (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) 2))) phi1))) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 phi2 (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) phi1) (pow.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) phi1)) phi1)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 phi2 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))))))
(* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(.f64 phi2 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 phi2))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))
(.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) (/.f64 (.f64 (-.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (.f64 phi2 phi2)))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (-.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (/.f64 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) (.f64 phi2 (.f64 phi2 phi2)))))))
(* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) phi2)) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64)))))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))) (+.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) phi2)) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (+ (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))))
(.f64 lambda1 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1 (/ (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (-.f64 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))
(+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (+ (* lambda1 (cos (* 1/2 phi1))) (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))))
(+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda2 (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 lambda2 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2) (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 lambda2 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2) (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (* phi2 (sin (* 1/2 phi1)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 lambda2 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2) (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 (.f64 #s(literal -1/4 binary64) phi1) (*.f64 phi2 (-.f64 lambda1 lambda2))) lambda2))
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) phi2) (-.f64 lambda1 lambda2)) (.f64 #s(literal -1/8 binary64) (*.f64 phi1 (-.f64 lambda1 lambda2))))) lambda2))
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) phi2) (-.f64 lambda1 lambda2)) (.f64 phi1 (+.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/96 binary64) phi1) (.f64 phi2 (-.f64 lambda1 lambda2))))))) lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 lambda1 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 (.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64)) (-.f64 lambda1 lambda2)) lambda2))
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)
(-.f64 (+.f64 lambda1 (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/384 binary64)) (-.f64 lambda1 lambda2))))) lambda2)
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(+.f64 lambda1 (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 (.f64 phi1 phi1) #s(literal -1/46080 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/384 binary64)))))) lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R (*.f64 phi2 phi1))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* R phi1)) (* R phi2)))) phi1)
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 (-.f64 (.f64 R phi2) (.f64 R phi1)))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* R phi1)) (* R phi2)))) phi1)
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 (-.f64 (.f64 R phi2) (.f64 R phi1)))) phi1)
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(.f64 phi1 (-.f64 (/.f64 (.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) R))
(* phi1 (+ (* -1 R) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 (* R (* phi1 (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(* -1 (* R (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))
(+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))
(-.f64 (.f64 R phi2) (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))))
(+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))
(-.f64 (.f64 R phi2) (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))))
(+ (* -1 (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R phi2))
(-.f64 (.f64 R phi2) (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) phi2)))
(* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) phi2)))
(* phi2 (+ R (* -1 (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) phi2)))
(* R phi2)
(*.f64 R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) phi2) R) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) phi2) R) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 R) (/ (* phi1 (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) phi2))))
(.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))) phi2) R) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1)))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (/ (* R (* lambda1 lambda2)) phi1))
(-.f64 (/.f64 (.f64 (.f64 R lambda1) lambda2) phi1) (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))))
(-.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R lambda1) phi1)) (/.f64 (.f64 R lambda2) phi1))) (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))))
(-.f64 (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R lambda1) phi1)) (/.f64 (.f64 R lambda2) phi1))) (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))))
(* -1/2 (/ (* R (pow lambda1 2)) phi1))
(.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (*.f64 lambda1 lambda1) phi1)))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda2) lambda1) phi1)))
(* (pow lambda1 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda1 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1)))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda2) lambda1) phi1)) (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) (*.f64 lambda1 lambda1))))
(* (pow lambda1 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda1 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1)))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda2) lambda1) phi1)) (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) (*.f64 lambda1 lambda1))))
(* -1/2 (/ (* R (pow lambda1 2)) phi1))
(.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (*.f64 lambda1 lambda1) phi1)))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda2) lambda1) phi1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda1)) lambda1)) (* -1/2 (/ R phi1))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda1)) lambda1)) (* -1/2 (/ R phi1))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))))
(.f64 phi1 (neg.f64 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (*.f64 R phi2) phi1))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (/ (* R (* lambda1 lambda2)) phi1))
(-.f64 (/.f64 (.f64 (.f64 R lambda1) lambda2) phi1) (.f64 phi1 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (*.f64 R phi2) phi1))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))))
(-.f64 (.f64 lambda2 (+.f64 (/.f64 (.f64 R lambda1) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R lambda2)) phi1))) (.f64 phi1 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (*.f64 R phi2) phi1))))
(+ (* -1 (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))))) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))))
(-.f64 (.f64 lambda2 (+.f64 (/.f64 (.f64 R lambda1) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R lambda2)) phi1))) (.f64 phi1 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (*.f64 R phi2) phi1))))
(* -1/2 (/ (* R (pow lambda2 2)) phi1))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 lambda2 lambda2))) phi1)
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda1) lambda2) phi1)))
(* (pow lambda2 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda2 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1)))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda1) lambda2) phi1)) (/.f64 (.f64 phi1 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (.f64 R phi2) phi1))) (.f64 lambda2 lambda2))))
(* (pow lambda2 2) (+ (* -1 (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) (pow lambda2 2))) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1)))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda1) lambda2) phi1)) (/.f64 (.f64 phi1 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (.f64 R phi2) phi1))) (.f64 lambda2 lambda2))))
(* -1/2 (/ (* R (pow lambda2 2)) phi1))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 lambda2 lambda2))) phi1)
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda1) lambda2) phi1)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda2)) lambda2)) (* -1/2 (/ R phi1))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (.f64 R phi2) phi1))) lambda2) (/.f64 (*.f64 R lambda1) phi1)) lambda2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (/ (* phi1 (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))) lambda2)) lambda2)) (* -1/2 (/ R phi1))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (.f64 R phi2) phi1))) lambda2) (/.f64 (*.f64 R lambda1) phi1)) lambda2)))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(.f64 R (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(.f64 R (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(.f64 R (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(.f64 R (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(.f64 R (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(.f64 R (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(.f64 R (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* R (- 1 (+ (* -1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))) (/ phi2 phi1))))
(.f64 R (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(.f64 R (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(.f64 R (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(.f64 R (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(* R (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (pow (- lambda1 lambda2) 2) (pow phi1 2))))))
(.f64 R (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))
(- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1)))
(- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(-.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))
(- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(-.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))
(- (+ R (* -1 (/ (* R phi2) phi1))) (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(-.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))
(* -1 (/ (* R phi2) phi1))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 R phi2) phi1))
(* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))
(.f64 phi2 (-.f64 (/.f64 R phi2) (+.f64 (/.f64 R phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi1 phi1))))))
(* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))
(.f64 phi2 (-.f64 (/.f64 R phi2) (+.f64 (/.f64 R phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi1 phi1))))))
(* phi2 (- (/ R phi2) (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1))))
(.f64 phi2 (-.f64 (/.f64 R phi2) (+.f64 (/.f64 R phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi1 phi1))))))
(* -1 (/ (* R phi2) phi1))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 R phi2) phi1))
(* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))
(.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) phi2)) (/.f64 R phi1)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))
(.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) phi2)) (/.f64 R phi1)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (- (* -1 (/ (- R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) phi2)) (* -1 (/ R phi1)))))
(.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) phi2)) (/.f64 R phi1)) (-.f64 #s(literal 0 binary64) phi2))
(- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (*.f64 phi1 phi1))))
(- (+ R (* -1 (/ (* R (* lambda1 lambda2)) (pow phi1 2)))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(-.f64 (-.f64 R (/.f64 (.f64 (.f64 R lambda1) lambda2) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))
(- (+ R (* lambda1 (- (* 1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(+.f64 R (-.f64 (.f64 lambda1 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R lambda1)) (.f64 phi1 phi1)) (.f64 R (/.f64 lambda2 (.f64 phi1 phi1))))) (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (*.f64 phi1 phi1)))))
(- (+ R (* lambda1 (- (* 1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(+.f64 R (-.f64 (.f64 lambda1 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R lambda1)) (.f64 phi1 phi1)) (.f64 R (/.f64 lambda2 (.f64 phi1 phi1))))) (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (*.f64 phi1 phi1)))))
(* 1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))
(.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (*.f64 lambda1 lambda1) phi1)))
(* (pow lambda1 2) (- (* -1 (/ (* R lambda2) (* lambda1 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda2)) (.f64 lambda1 (.f64 phi1 phi1))) (.f64 #s(literal 1/2 binary64) (/.f64 R (.f64 phi1 phi1)))))
(* (pow lambda1 2) (- (/ R (pow lambda1 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1)))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (/.f64 R (.f64 lambda1 lambda1)) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) (/.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 lambda1 lambda1)))) (+.f64 (/.f64 (.f64 R lambda2) (.f64 lambda1 (.f64 phi1 phi1))) (/.f64 (.f64 R phi2) (.f64 phi1 (.f64 lambda1 lambda1)))))))
(* (pow lambda1 2) (- (/ R (pow lambda1 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1)))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (/.f64 R (.f64 lambda1 lambda1)) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) (/.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 lambda1 lambda1)))) (+.f64 (/.f64 (.f64 R lambda2) (.f64 lambda1 (.f64 phi1 phi1))) (/.f64 (.f64 R phi2) (.f64 phi1 (.f64 lambda1 lambda1)))))))
(* 1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))
(.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (*.f64 lambda1 lambda1) phi1)))
(* (pow lambda1 2) (- (* -1 (/ (* R lambda2) (* lambda1 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda2)) (.f64 lambda1 (.f64 phi1 phi1))) (.f64 #s(literal 1/2 binary64) (/.f64 R (.f64 phi1 phi1)))))
(* (pow lambda1 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda1)) (* -1 (/ (* R lambda2) (pow phi1 2)))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (/.f64 (neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1)))) lambda1)) (.f64 R (/.f64 lambda2 (.f64 phi1 phi1))))) lambda1) (.f64 #s(literal 1/2 binary64) (/.f64 R (*.f64 phi1 phi1)))))
(* (pow lambda1 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda1)) (* -1 (/ (* R lambda2) (pow phi1 2)))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (/.f64 (neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1)))) lambda1)) (.f64 R (/.f64 lambda2 (.f64 phi1 phi1))))) lambda1) (.f64 #s(literal 1/2 binary64) (/.f64 R (*.f64 phi1 phi1)))))
(- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (.f64 R phi2) phi1))
(- (+ R (* -1 (/ (* R (* lambda1 lambda2)) (pow phi1 2)))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(-.f64 (-.f64 R (/.f64 (.f64 (.f64 R lambda1) lambda2) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1)))))
(- (+ R (* lambda2 (- (* 1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(+.f64 R (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (/.f64 lambda2 (.f64 phi1 phi1)))) (/.f64 (.f64 R lambda1) (.f64 phi1 phi1)))) (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (*.f64 phi1 phi1))))))
(- (+ R (* lambda2 (- (* 1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2))))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)))
(+.f64 R (-.f64 (.f64 lambda2 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (/.f64 lambda2 (.f64 phi1 phi1)))) (/.f64 (.f64 R lambda1) (.f64 phi1 phi1)))) (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (*.f64 phi1 phi1))))))
(* 1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))
(* (pow lambda2 2) (- (* -1 (/ (* R lambda1) (* lambda2 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda1)) (.f64 lambda2 (.f64 phi1 phi1))) (.f64 #s(literal 1/2 binary64) (/.f64 R (.f64 phi1 phi1)))))
(* (pow lambda2 2) (- (/ R (pow lambda2 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1)))))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (/.f64 R (.f64 lambda2 lambda2)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (+.f64 (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R lambda1) (.f64 lambda2 (.f64 phi1 phi1))) (/.f64 (.f64 R phi2) (.f64 phi1 (.f64 lambda2 lambda2))))))))
(* (pow lambda2 2) (- (/ R (pow lambda2 2)) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1)))))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (/.f64 R (.f64 lambda2 lambda2)) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (+.f64 (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R lambda1) (.f64 lambda2 (.f64 phi1 phi1))) (/.f64 (.f64 R phi2) (.f64 phi1 (.f64 lambda2 lambda2))))))))
(* 1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))
(* (pow lambda2 2) (- (* -1 (/ (* R lambda1) (* lambda2 (pow phi1 2)))) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda1)) (.f64 lambda2 (.f64 phi1 phi1))) (.f64 #s(literal 1/2 binary64) (/.f64 R (.f64 phi1 phi1)))))
(* (pow lambda2 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda2)) (* -1 (/ (* R lambda1) (pow phi1 2)))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (.f64 R phi2) phi1)) lambda2)) (/.f64 (.f64 R lambda1) (.f64 phi1 phi1))) lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 R (.f64 phi1 phi1)))))
(* (pow lambda2 2) (- (* -1 (/ (- (* -1 (/ (- R (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1))) lambda2)) (* -1 (/ (* R lambda1) (pow phi1 2)))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (+.f64 R (.f64 (/.f64 #s(literal 1/2 binary64) phi1) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (/.f64 (.f64 R phi2) phi1)) lambda2)) (/.f64 (.f64 R lambda1) (.f64 phi1 phi1))) lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 R (.f64 phi1 phi1)))))
(* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 phi1))
(/ (- (* -1 (* R (* phi1 phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi2 phi1))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 phi1))
(/ (- (* phi1 (- (* R phi1) (* R phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))
(/.f64 (-.f64 (.f64 phi1 (.f64 R (-.f64 phi1 phi2))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 phi1))
(/ (- (* phi1 (- (* R phi1) (* R phi2))) (* -1/2 (* R (pow (- lambda1 lambda2) 2)))) (pow phi1 2))
(/.f64 (-.f64 (.f64 phi1 (.f64 R (-.f64 phi1 phi2))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (.f64 phi1 phi1))
R
(+ R (* -1 (/ (* R phi2) phi1)))
(-.f64 R (/.f64 (*.f64 R phi2) phi1))
(- (+ R (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (/ (* R phi2) phi1))
(-.f64 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) (/.f64 (*.f64 R phi2) phi1))
(- (+ R (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (/ (* R phi2) phi1))
(-.f64 (-.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))) (/.f64 (*.f64 R phi2) phi1))
R
(+ R (* -1 (/ (* R phi2) phi1)))
(-.f64 R (/.f64 (*.f64 R phi2) phi1))
(+ R (* -1 (/ (- (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* -1 (* R phi2))) phi1)))
(-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1))
(+ R (* -1 (/ (- (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* -1 (* R phi2))) phi1)))
(-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1))
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
(/ (* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1)
(/.f64 (.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)
(* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2)) phi1)
(* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2)) phi1)
(* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2)) phi1)
(* -1 (/ (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))) phi1))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2)) phi1)
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))
(+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))
(+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (/ (* R phi2) phi1))
(+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))
(/ (* R phi2) phi1)
(/.f64 (*.f64 R phi2) phi1)
(* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))
(.f64 phi2 (+.f64 (/.f64 R phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi1 phi1)))))
(* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))
(.f64 phi2 (+.f64 (/.f64 R phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi1 phi1)))))
(* phi2 (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))) (/ R phi1)))
(.f64 phi2 (+.f64 (/.f64 R phi1) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi2 (.f64 phi1 phi1)))))
(/ (* R phi2) phi1)
(/.f64 (*.f64 R phi2) phi1)
(* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)) (/.f64 R phi2))) (/.f64 R phi1)))
(* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)) (/.f64 R phi2))) (/.f64 R phi1)))
(* -1 (* phi2 (+ (* -1 (/ R phi1)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* (pow phi1 2) phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)) (/.f64 R phi2))) (/.f64 R phi1)))
(/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) phi1)
(/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) phi1)) phi1)
(+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (/ (* R phi2) phi1) (/ (* R (* lambda1 lambda2)) (pow phi1 2))))
(+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1)) (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 (.f64 R lambda1) lambda2) (.f64 phi1 phi1))))
(+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (* lambda1 (+ (* -1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2)))) (/ (* R phi2) phi1)))
(+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1)) (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 lambda1 (+.f64 (.f64 R (/.f64 lambda2 (.f64 phi1 phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R lambda1)) (*.f64 phi1 phi1))))))
(+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (+ (* lambda1 (+ (* -1/2 (/ (* R lambda1) (pow phi1 2))) (/ (* R lambda2) (pow phi1 2)))) (/ (* R phi2) phi1)))
(+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1)) (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 lambda1 (+.f64 (.f64 R (/.f64 lambda2 (.f64 phi1 phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R lambda1)) (*.f64 phi1 phi1))))))
(* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1)))
(* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda2) (* lambda1 (pow phi1 2)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (/.f64 (.f64 R lambda2) (.f64 lambda1 (.f64 phi1 phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) R) (*.f64 phi1 phi1))))
(* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) (/.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 lambda1 lambda1)))) (+.f64 (/.f64 (.f64 R lambda2) (.f64 lambda1 (.f64 phi1 phi1))) (/.f64 (.f64 R phi2) (.f64 phi1 (*.f64 lambda1 lambda1))))))
(* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) (pow phi1 2)))) (+ (/ (* R lambda2) (* lambda1 (pow phi1 2))) (/ (* R phi2) (* (pow lambda1 2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 phi1 phi1)) (/.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 lambda1 lambda1)))) (+.f64 (/.f64 (.f64 R lambda2) (.f64 lambda1 (.f64 phi1 phi1))) (/.f64 (.f64 R phi2) (.f64 phi1 (*.f64 lambda1 lambda1))))))
(* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2)))
(.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1)))
(* (pow lambda1 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda2) (* lambda1 (pow phi1 2)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (/.f64 (.f64 R lambda2) (.f64 lambda1 (.f64 phi1 phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) R) (*.f64 phi1 phi1))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda1))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (.f64 R (/.f64 lambda2 (.f64 phi1 phi1)))) (/.f64 (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (*.f64 phi1 phi1))) lambda1)) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda1))) lambda1)) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (.f64 R (/.f64 lambda2 (.f64 phi1 phi1)))) (/.f64 (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (*.f64 phi1 phi1))) lambda1)) lambda1)))
(/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) phi1)
(/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) phi1)
(+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (/ (* R phi2) phi1) (/ (* R (* lambda1 lambda2)) (pow phi1 2))))
(+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 (.f64 R lambda1) lambda2) (.f64 phi1 phi1))))
(+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (* lambda2 (+ (* -1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2)))) (/ (* R phi2) phi1)))
(+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 lambda2 (+.f64 (/.f64 (.f64 R lambda1) (.f64 phi1 phi1)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R lambda2)) (*.f64 phi1 phi1))))))
(+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (+ (* lambda2 (+ (* -1/2 (/ (* R lambda2) (pow phi1 2))) (/ (* R lambda1) (pow phi1 2)))) (/ (* R phi2) phi1)))
(+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 lambda2 (+.f64 (/.f64 (.f64 R lambda1) (.f64 phi1 phi1)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R lambda2)) (*.f64 phi1 phi1))))))
(* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))
(* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda1) (* lambda2 (pow phi1 2)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (/.f64 (.f64 R lambda1) (.f64 lambda2 (*.f64 phi1 phi1)))))
(* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1))))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (+.f64 (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R lambda1) (.f64 lambda2 (.f64 phi1 phi1))) (/.f64 (.f64 R phi2) (.f64 phi1 (*.f64 lambda2 lambda2)))))))
(* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) (pow phi1 2)))) (+ (/ (* R lambda1) (* lambda2 (pow phi1 2))) (/ (* R phi2) (* (pow lambda2 2) phi1))))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (+.f64 (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 R lambda1) (.f64 lambda2 (.f64 phi1 phi1))) (/.f64 (.f64 R phi2) (.f64 phi1 (*.f64 lambda2 lambda2)))))))
(* -1/2 (/ (* R (pow lambda2 2)) (pow phi1 2)))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))
(* (pow lambda2 2) (+ (* -1/2 (/ R (pow phi1 2))) (/ (* R lambda1) (* lambda2 (pow phi1 2)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (/.f64 (.f64 R lambda1) (.f64 lambda2 (*.f64 phi1 phi1)))))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda2))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda1)) (.f64 phi1 phi1)) (/.f64 (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1)))) lambda2)) lambda2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) (pow phi1 2))) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) (pow phi1 2))) (/ (* R phi2) phi1)) lambda2))) lambda2)) (* -1/2 (/ R (pow phi1 2)))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 phi1 phi1)) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda1)) (.f64 phi1 phi1)) (/.f64 (+.f64 (/.f64 (.f64 R phi2) phi1) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 phi1)))) lambda2)) lambda2)))
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 phi1 phi1))
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R (.f64 phi2 phi1))) (.f64 phi1 phi1))
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R (.f64 phi2 phi1))) (.f64 phi1 phi1))
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) (pow phi1 2))
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R (.f64 phi2 phi1))) (.f64 phi1 phi1))
(/ (* R phi2) phi1)
(/.f64 (*.f64 R phi2) phi1)
(/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)
(/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)
(/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)
(/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)
(/ (+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2)) phi1)
(/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)
(/ (* R phi2) phi1)
(/.f64 (*.f64 R phi2) phi1)
(* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1) (.f64 R phi2)) phi1))
(* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1) (.f64 R phi2)) phi1))
(* -1 (/ (+ (* -1 (* R phi2)) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))) phi1))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1) (.f64 R phi2)) phi1))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
(* R (+ phi2 (* -1/2 (/ (pow (- lambda1 lambda2) 2) phi1))))
(.f64 R (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))
(* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2))
(* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2))
(* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2))
(* -1 (* R (+ (* -1 phi2) (* 1/2 (/ (pow (- lambda1 lambda2) 2) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2))
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))
(.f64 phi2 (+.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi1))))
(* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))
(.f64 phi2 (+.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi1))))
(* phi2 (+ R (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2)))))
(.f64 phi2 (+.f64 R (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi1))))
(* R phi2)
(*.f64 R phi2)
(* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi1)) R))
(* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi1)) R))
(* -1 (* phi2 (+ (* -1 R) (* 1/2 (/ (* R (pow (- lambda1 lambda2) 2)) (* phi1 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi1)) R))
(+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) phi1))
(+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (/ (* R (* lambda1 lambda2)) phi1)))
(+.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) phi1)) (/.f64 (.f64 (.f64 R lambda1) lambda2) phi1))
(+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1)))))
(+.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) phi1)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R lambda1) phi1)) (/.f64 (.f64 R lambda2) phi1))))
(+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (+ (* R phi2) (* lambda1 (+ (* -1/2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1)))))
(+.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) phi1)) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R lambda1) phi1)) (/.f64 (.f64 R lambda2) phi1))))
(* -1/2 (/ (* R (pow lambda1 2)) phi1))
(.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (*.f64 lambda1 lambda1) phi1)))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda2) lambda1) phi1)))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1))) (+ (/ (* R lambda2) (* lambda1 phi1)) (/ (* R phi2) (pow lambda1 2))))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 (.f64 lambda1 lambda1))) (/.f64 (/.f64 (.f64 R lambda2) lambda1) phi1)) (/.f64 (.f64 R phi2) (*.f64 lambda1 lambda1)))))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1))) (+ (/ (* R lambda2) (* lambda1 phi1)) (/ (* R phi2) (pow lambda1 2))))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 (.f64 lambda1 lambda1))) (/.f64 (/.f64 (.f64 R lambda2) lambda1) phi1)) (/.f64 (.f64 R phi2) (*.f64 lambda1 lambda1)))))
(* -1/2 (/ (* R (pow lambda1 2)) phi1))
(.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (*.f64 lambda1 lambda1) phi1)))
(* (pow lambda1 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda2) (* lambda1 phi1))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda2) lambda1) phi1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) lambda1))) lambda1)) (* -1/2 (/ R phi1))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda2)) phi1) (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 lambda2 lambda2))) phi1)) lambda1)) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda2) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda2 2)) phi1)) (* R phi2)) lambda1))) lambda1)) (* -1/2 (/ R phi1))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda2)) phi1) (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 lambda2 lambda2))) phi1)) lambda1)) lambda1)))
(+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))))
(+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (/ (* R (* lambda1 lambda2)) phi1)))
(+.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) (+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 R lambda1) lambda2) phi1)))
(+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1)))))
(+.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (.f64 lambda2 (+.f64 (/.f64 (.f64 R lambda1) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R lambda2)) phi1))))
(+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (+ (* R phi2) (* lambda2 (+ (* -1/2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1)))))
(+.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (.f64 lambda2 (+.f64 (/.f64 (.f64 R lambda1) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R lambda2)) phi1))))
(* -1/2 (/ (* R (pow lambda2 2)) phi1))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 lambda2 lambda2))) phi1)
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda1) lambda2) phi1)))
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1))) (+ (/ (* R lambda1) (* lambda2 phi1)) (/ (* R phi2) (pow lambda2 2))))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (+.f64 (/.f64 (/.f64 (.f64 R lambda1) lambda2) phi1) (.f64 R (/.f64 phi2 (.f64 lambda2 lambda2))))))
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (+ (* -1/2 (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1))) (+ (/ (* R lambda1) (* lambda2 phi1)) (/ (* R phi2) (pow lambda2 2))))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (.f64 (/.f64 #s(literal -1/2 binary64) (.f64 lambda2 lambda2)) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) (+.f64 (/.f64 (/.f64 (.f64 R lambda1) lambda2) phi1) (.f64 R (/.f64 phi2 (.f64 lambda2 lambda2))))))
(* -1/2 (/ (* R (pow lambda2 2)) phi1))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (*.f64 lambda2 lambda2))) phi1)
(* (pow lambda2 2) (+ (* -1/2 (/ R phi1)) (/ (* R lambda1) (* lambda2 phi1))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (/.f64 (.f64 R lambda1) lambda2) phi1)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) lambda2))) lambda2)) (* -1/2 (/ R phi1))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (.f64 R lambda1) phi1)) (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) lambda2)) lambda2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R lambda1) phi1)) (* -1 (/ (+ (* -1/2 (/ (* R (pow lambda1 2)) phi1)) (* R phi2)) lambda2))) lambda2)) (* -1/2 (/ R phi1))))
(.f64 (.f64 lambda2 lambda2) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (.f64 R lambda1) phi1)) (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)))) lambda2)) lambda2)))
(* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1))
(/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R (*.f64 phi2 phi1))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R (*.f64 phi2 phi1))) phi1)
(/ (+ (* -1/2 (* R (pow (- lambda1 lambda2) 2))) (* R (* phi1 phi2))) phi1)
(/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 R (*.f64 phi2 phi1))) phi1)
(* R phi2)
(*.f64 R phi2)
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(* R phi2)
(*.f64 R phi2)
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(+ (* -1/2 (/ (* R (pow (- lambda1 lambda2) 2)) phi1)) (* R phi2))
(+.f64 (.f64 R phi2) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(+ (* -1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 phi1 lambda2) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))))
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* -1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 (.f64 R #s(literal -1/8 binary64)) (.f64 (.f64 phi1 lambda2) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))))
(+ (* R (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda2) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/48 binary64) R) (.f64 (.f64 phi1 lambda2) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* R (* lambda2 (cos (* 1/2 phi1)))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/2 binary64) R) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* -1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 R #s(literal -1/8 binary64)) (.f64 (.f64 phi2 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* R (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* -1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/8 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))))))
(+.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal 1/48 binary64) R) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 phi2)))
(.f64 R (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))
(+ (* -1/2 (* R (* phi1 (sin (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))
(+.f64 (.f64 R (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R phi1) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/8 (* R (* phi1 (cos (* 1/2 phi2))))))))
(+.f64 (.f64 R (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R phi1) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* 1/48 (* R (* phi1 (sin (* 1/2 phi2))))))))))
(+.f64 (.f64 R (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 phi1 (+.f64 (.f64 (.f64 R #s(literal -1/8 binary64)) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 R phi1) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* R (* phi2 (sin (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))
(+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/8 (* R (* phi2 (cos (* 1/2 phi1))))))))
(+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* 1/48 (* R (* phi2 (sin (* 1/2 phi1))))))))))
(+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) R) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 R #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 R phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (.f64 (.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(* 1/2 phi2)
(*.f64 phi2 #s(literal 1/2 binary64))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1)))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1)))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(* 1/2 phi2)
(*.f64 phi2 #s(literal 1/2 binary64))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* 1/2 phi2)
(*.f64 phi2 #s(literal 1/2 binary64))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* R (* lambda2 (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (.f64 R lambda2) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (- R (/ (* R lambda1) lambda2))))
(-.f64 #s(literal 0 binary64) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))))
(+ (* -1 (* lambda2 (* (pow phi1 2) (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))))
(-.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))) (.f64 (.f64 lambda2 (.f64 phi1 phi1)) (.f64 #s(literal -1/8 binary64) (-.f64 R (/.f64 (*.f64 R lambda1) lambda2)))))
(+ (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))) (* (pow phi1 2) (+ (* -1 (* lambda2 (* (pow phi1 2) (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))))))
(-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 lambda2 (.f64 phi1 phi1)) (neg.f64 (.f64 #s(literal 1/384 binary64) (-.f64 R (/.f64 (.f64 R lambda1) lambda2))))) (.f64 lambda2 (.f64 #s(literal -1/8 binary64) (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))))) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))))
(+ (* -1 (* lambda2 (- R (/ (* R lambda1) lambda2)))) (* (pow phi1 2) (+ (* -1 (* lambda2 (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))) (* (pow phi1 2) (+ (* -1 (* lambda2 (* (pow phi1 2) (- (* -1/46080 R) (* -1/46080 (/ (* R lambda1) lambda2)))))) (* -1 (* lambda2 (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2))))))))))
(-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 phi1 phi1) (-.f64 (.f64 (.f64 (.f64 phi1 phi1) (.f64 #s(literal -1/46080 binary64) (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 lambda2 (.f64 #s(literal 1/384 binary64) (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))))) (.f64 lambda2 (.f64 #s(literal -1/8 binary64) (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))))) (.f64 lambda2 (-.f64 R (/.f64 (*.f64 R lambda1) lambda2))))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 lambda1))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 phi1)))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 R (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 R (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 R (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 R (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 R (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 R (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 R (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* R (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(.f64 R (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* R (- (* -1 (cos (* 1/2 phi1))) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(- R (/ (* R lambda1) lambda2))
(-.f64 R (/.f64 (*.f64 R lambda1) lambda2))
(- (+ R (* (pow phi1 2) (- (* -1/8 R) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))
(+.f64 R (-.f64 (.f64 (.f64 phi1 phi1) (.f64 #s(literal -1/8 binary64) (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))) (/.f64 (*.f64 R lambda1) lambda2)))
(- (+ R (* (pow phi1 2) (- (+ (* -1/8 R) (* (pow phi1 2) (- (* 1/384 R) (* 1/384 (/ (* R lambda1) lambda2))))) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))
(+.f64 R (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 (.f64 R #s(literal -1/8 binary64)) (+.f64 (.f64 (.f64 phi1 phi1) (.f64 #s(literal 1/384 binary64) (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))) (.f64 (/.f64 (.f64 R lambda1) lambda2) #s(literal 1/8 binary64))))) (/.f64 (.f64 R lambda1) lambda2)))
(- (+ R (* (pow phi1 2) (- (+ (* -1/8 R) (* (pow phi1 2) (- (+ (* 1/384 R) (* (pow phi1 2) (- (* -1/46080 R) (* -1/46080 (/ (* R lambda1) lambda2))))) (* 1/384 (/ (* R lambda1) lambda2))))) (* -1/8 (/ (* R lambda1) lambda2))))) (/ (* R lambda1) lambda2))
(+.f64 R (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 (.f64 R #s(literal -1/8 binary64)) (-.f64 (.f64 (.f64 phi1 phi1) (+.f64 (.f64 R #s(literal 1/384 binary64)) (+.f64 (.f64 (.f64 phi1 phi1) (.f64 #s(literal -1/46080 binary64) (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))) (.f64 (/.f64 (.f64 R lambda1) lambda2) #s(literal -1/384 binary64))))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 R lambda1)) lambda2)))) (/.f64 (*.f64 R lambda1) lambda2)))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(/.f64 (.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda1 (-.f64 (/.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (/.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda1 (-.f64 (/.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (/.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* lambda1 (- (/ (* R (cos (* 1/2 phi1))) lambda1) (/ (* R (cos (* 1/2 phi1))) lambda2)))
(.f64 lambda1 (-.f64 (/.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1) (/.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(/.f64 (.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))
(.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) R)) lambda1) (/.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))
(.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) R)) lambda1) (/.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (* -1 (/ (* R (cos (* 1/2 phi1))) lambda1)) (* -1 (/ (* R (cos (* 1/2 phi1))) lambda2)))))
(.f64 (+.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) R)) lambda1) (/.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (neg.f64 lambda1))
(* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2))
(/.f64 (.f64 (.f64 #s(literal -1 binary64) (.f64 R lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)
(/.f64 (.f64 R (-.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)
(/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)
(/.f64 (.f64 R (-.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)
(/ (- (* R (* lambda2 (cos (* 1/2 phi1)))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)
(/.f64 (.f64 R (-.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))
(-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
R
(+ R (* -1/8 (* R (pow phi1 2))))
(+.f64 R (.f64 #s(literal -1/8 binary64) (.f64 R (*.f64 phi1 phi1))))
(+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(+.f64 R (.f64 (.f64 phi1 phi1) (+.f64 (.f64 R #s(literal -1/8 binary64)) (.f64 #s(literal 1/384 binary64) (.f64 R (.f64 phi1 phi1))))))
(+ R (* (pow phi1 2) (+ (* -1/8 R) (* (pow phi1 2) (+ (* -1/46080 (* R (pow phi1 2))) (* 1/384 R))))))
(+.f64 R (.f64 (.f64 phi1 phi1) (+.f64 (.f64 R #s(literal -1/8 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 R #s(literal 1/384 binary64)) (.f64 #s(literal -1/46080 binary64) (.f64 R (*.f64 phi1 phi1))))))))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(* R (cos (* 1/2 phi1)))
(.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/8 binary64)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 phi1 phi1) (+.f64 #s(literal 1/384 binary64) (.f64 (.f64 phi1 phi1) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/4 binary64) phi1) (*.f64 phi2 (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* 1/96 (* (pow phi1 2) (* phi2 (- lambda1 lambda2))))))
(.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) phi2) (-.f64 lambda1 lambda2)) (.f64 (.f64 #s(literal 1/96 binary64) (.f64 phi1 phi1)) (*.f64 phi2 (-.f64 lambda1 lambda2)))))
(* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) (* phi2 (- lambda1 lambda2)))) (* 1/96 (* phi2 (- lambda1 lambda2)))))))
(.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) phi2) (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #s(literal -1/7680 binary64) (.f64 phi1 phi1)) (.f64 phi2 (-.f64 lambda1 lambda2))) (.f64 (*.f64 #s(literal 1/96 binary64) phi2) (-.f64 lambda1 lambda2))))))
(* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/96 (* phi2 (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/7680 (* phi2 (- lambda1 lambda2))) (* 1/1290240 (* (pow phi1 2) (* phi2 (- lambda1 lambda2))))))))))
(.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) phi2) (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #s(literal 1/96 binary64) phi2) (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #s(literal -1/7680 binary64) phi2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 lambda1 lambda2))) #s(literal 1/1290240 binary64))))))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))
(.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))
(.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)))
(* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))
(.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)))
(* lambda1 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1))))
(.f64 lambda1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)))
(* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))
(.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 (* phi2 (sin (* 1/2 phi1)))) lambda1)) (* 1/2 (* phi2 (sin (* 1/2 phi1)))))))
(.f64 (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (neg.f64 lambda1))
(* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1)))))
(.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda2 (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2)))
(* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda2 (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2)))
(* lambda2 (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (* 1/2 (* phi2 (sin (* 1/2 phi1))))))
(.f64 lambda2 (+.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2)))
(* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1)))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))
(.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))
(.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))
(.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* -1/2 (* phi2 (- lambda1 lambda2)))
(.f64 (.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2))
(* 1/2 (* lambda2 phi2))
(.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)))
(* -1/2 (* lambda1 phi2))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1))
(* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))
(.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) lambda1)))
(* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))
(.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) lambda1)))
(* lambda1 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda2 phi2) lambda1))))
(.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) lambda1)))
(* -1/2 (* lambda1 phi2))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))
(.f64 (+.f64 (.f64 phi2 #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda2)) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))
(.f64 (+.f64 (.f64 phi2 #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda2)) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1/2 (/ (* lambda2 phi2) lambda1)) (* 1/2 phi2))))
(.f64 (+.f64 (.f64 phi2 #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda2)) lambda1)) (neg.f64 lambda1))
(* -1/2 (* lambda1 phi2))
(.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)))
(+ (* -1/2 (* lambda1 phi2)) (* 1/2 (* lambda2 phi2)))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)))
(* 1/2 (* lambda2 phi2))
(.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2))
(* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))
(.f64 lambda2 (+.f64 (.f64 phi2 #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)) lambda2)))
(* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))
(.f64 lambda2 (+.f64 (.f64 phi2 #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)) lambda2)))
(* lambda2 (+ (* -1/2 (/ (* lambda1 phi2) lambda2)) (* 1/2 phi2)))
(.f64 lambda2 (+.f64 (.f64 phi2 #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 lambda1)) lambda2)))
(* 1/2 (* lambda2 phi2))
(.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda2))
(* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1/2 phi2) (* 1/2 (/ (* lambda1 phi2) lambda2)))))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 phi2 lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow (- lambda1 lambda2) 2))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(* R (pow lambda2 2))
(.f64 R (.f64 lambda2 lambda2))
(+ (* -2 (* R (* lambda1 lambda2))) (* R (pow lambda2 2)))
(+.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 #s(literal -2 binary64) (.f64 (*.f64 R lambda1) lambda2)))
(+ (* R (pow lambda2 2)) (* lambda1 (+ (* -2 (* R lambda2)) (* R lambda1))))
(+.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 lambda1 (+.f64 (.f64 R lambda1) (.f64 #s(literal -2 binary64) (.f64 R lambda2)))))
(+ (* R (pow lambda2 2)) (* lambda1 (+ (* -2 (* R lambda2)) (* R lambda1))))
(+.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 lambda1 (+.f64 (.f64 R lambda1) (.f64 #s(literal -2 binary64) (.f64 R lambda2)))))
(* R (pow lambda1 2))
(.f64 R (.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ R (* -2 (/ (* R lambda2) lambda1))))
(.f64 (.f64 lambda1 lambda1) (+.f64 R (.f64 #s(literal -2 binary64) (/.f64 (.f64 R lambda2) lambda1))))
(* (pow lambda1 2) (+ R (+ (* -2 (/ (* R lambda2) lambda1)) (/ (* R (pow lambda2 2)) (pow lambda1 2)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 R (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 R lambda2) lambda1)) (/.f64 (.f64 R (.f64 lambda2 lambda2)) (*.f64 lambda1 lambda1)))))
(* (pow lambda1 2) (+ R (+ (* -2 (/ (* R lambda2) lambda1)) (/ (* R (pow lambda2 2)) (pow lambda1 2)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 R (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 R lambda2) lambda1)) (/.f64 (.f64 R (.f64 lambda2 lambda2)) (*.f64 lambda1 lambda1)))))
(* R (pow lambda1 2))
(.f64 R (.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ R (* -2 (/ (* R lambda2) lambda1))))
(.f64 (.f64 lambda1 lambda1) (+.f64 R (.f64 #s(literal -2 binary64) (/.f64 (.f64 R lambda2) lambda1))))
(* (pow lambda1 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) lambda1)) (* 2 (* R lambda2))) lambda1))))
(.f64 (.f64 lambda1 lambda1) (-.f64 R (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 R lambda2)) (/.f64 (.f64 R (.f64 lambda2 lambda2)) lambda1)) lambda1)))
(* (pow lambda1 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) lambda1)) (* 2 (* R lambda2))) lambda1))))
(.f64 (.f64 lambda1 lambda1) (-.f64 R (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 R lambda2)) (/.f64 (.f64 R (.f64 lambda2 lambda2)) lambda1)) lambda1)))
(* R (pow lambda1 2))
(.f64 R (.f64 lambda1 lambda1))
(+ (* -2 (* R (* lambda1 lambda2))) (* R (pow lambda1 2)))
(+.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 #s(literal -2 binary64) (.f64 (*.f64 R lambda1) lambda2)))
(+ (* R (pow lambda1 2)) (* lambda2 (+ (* -2 (* R lambda1)) (* R lambda2))))
(+.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 lambda2 (+.f64 (.f64 R lambda2) (.f64 #s(literal -2 binary64) (.f64 R lambda1)))))
(+ (* R (pow lambda1 2)) (* lambda2 (+ (* -2 (* R lambda1)) (* R lambda2))))
(+.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 lambda2 (+.f64 (.f64 R lambda2) (.f64 #s(literal -2 binary64) (.f64 R lambda1)))))
(* R (pow lambda2 2))
(.f64 R (.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ R (* -2 (/ (* R lambda1) lambda2))))
(.f64 (.f64 lambda2 lambda2) (+.f64 R (.f64 #s(literal -2 binary64) (/.f64 (.f64 R lambda1) lambda2))))
(* (pow lambda2 2) (+ R (+ (* -2 (/ (* R lambda1) lambda2)) (/ (* R (pow lambda1 2)) (pow lambda2 2)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (+.f64 R (.f64 #s(literal -2 binary64) (/.f64 (.f64 R lambda1) lambda2))) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2))))
(* (pow lambda2 2) (+ R (+ (* -2 (/ (* R lambda1) lambda2)) (/ (* R (pow lambda1 2)) (pow lambda2 2)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (+.f64 R (.f64 #s(literal -2 binary64) (/.f64 (.f64 R lambda1) lambda2))) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2))))
(* R (pow lambda2 2))
(.f64 R (.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ R (* -2 (/ (* R lambda1) lambda2))))
(.f64 (.f64 lambda2 lambda2) (+.f64 R (.f64 #s(literal -2 binary64) (/.f64 (.f64 R lambda1) lambda2))))
(* (pow lambda2 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) lambda2)) (* 2 (* R lambda1))) lambda2))))
(.f64 (.f64 lambda2 lambda2) (-.f64 R (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 R lambda1)) (/.f64 (.f64 R (.f64 lambda1 lambda1)) lambda2)) lambda2)))
(* (pow lambda2 2) (+ R (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) lambda2)) (* 2 (* R lambda1))) lambda2))))
(.f64 (.f64 lambda2 lambda2) (-.f64 R (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 R lambda1)) (/.f64 (.f64 R (.f64 lambda1 lambda1)) lambda2)) lambda2)))
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow lambda2 2)) phi1)
(/.f64 (.f64 R (.f64 lambda2 lambda2)) phi1)
(+ (* -2 (/ (* R (* lambda1 lambda2)) phi1)) (/ (* R (pow lambda2 2)) phi1))
(+.f64 (/.f64 (.f64 R (.f64 lambda2 lambda2)) phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (*.f64 R lambda1) lambda2)) phi1))
(+ (* lambda1 (+ (* -2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))) (/ (* R (pow lambda2 2)) phi1))
(+.f64 (/.f64 (.f64 R (.f64 lambda2 lambda2)) phi1) (.f64 lambda1 (+.f64 (/.f64 (.f64 R lambda1) phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda2)) phi1))))
(+ (* lambda1 (+ (* -2 (/ (* R lambda2) phi1)) (/ (* R lambda1) phi1))) (/ (* R (pow lambda2 2)) phi1))
(+.f64 (/.f64 (.f64 R (.f64 lambda2 lambda2)) phi1) (.f64 lambda1 (+.f64 (/.f64 (.f64 R lambda1) phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda2)) phi1))))
(/ (* R (pow lambda1 2)) phi1)
(.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))
(* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (/ R phi1)))
(.f64 (.f64 lambda1 lambda1) (+.f64 (/.f64 R phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda2)) (*.f64 phi1 lambda1))))
(* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (+ (/ R phi1) (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (+.f64 (/.f64 R phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda2)) (.f64 phi1 lambda1))) (/.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 phi1 (*.f64 lambda1 lambda1)))))
(* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (+ (/ R phi1) (/ (* R (pow lambda2 2)) (* (pow lambda1 2) phi1)))))
(.f64 (.f64 lambda1 lambda1) (+.f64 (+.f64 (/.f64 R phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda2)) (.f64 phi1 lambda1))) (/.f64 (.f64 R (.f64 lambda2 lambda2)) (.f64 phi1 (*.f64 lambda1 lambda1)))))
(/ (* R (pow lambda1 2)) phi1)
(.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))
(* (pow lambda1 2) (+ (* -2 (/ (* R lambda2) (* lambda1 phi1))) (/ R phi1)))
(.f64 (.f64 lambda1 lambda1) (+.f64 (/.f64 R phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda2)) (*.f64 phi1 lambda1))))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) (* lambda1 phi1))) (* 2 (/ (* R lambda2) phi1))) lambda1)) (/ R phi1)))
(.f64 (.f64 lambda1 lambda1) (-.f64 (/.f64 R phi1) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 R lambda2)) phi1) (/.f64 (/.f64 (.f64 R (.f64 lambda2 lambda2)) lambda1) phi1)) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda2 2)) (* lambda1 phi1))) (* 2 (/ (* R lambda2) phi1))) lambda1)) (/ R phi1)))
(.f64 (.f64 lambda1 lambda1) (-.f64 (/.f64 R phi1) (/.f64 (-.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 R lambda2)) phi1) (/.f64 (/.f64 (.f64 R (.f64 lambda2 lambda2)) lambda1) phi1)) lambda1)))
(/ (* R (pow lambda1 2)) phi1)
(.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))
(+ (* -2 (/ (* R (* lambda1 lambda2)) phi1)) (/ (* R (pow lambda1 2)) phi1))
(+.f64 (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)) (/.f64 (.f64 #s(literal -2 binary64) (.f64 (*.f64 R lambda1) lambda2)) phi1))
(+ (* lambda2 (+ (* -2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))) (/ (* R (pow lambda1 2)) phi1))
(+.f64 (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)) (.f64 lambda2 (+.f64 (/.f64 (.f64 R lambda2) phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda1)) phi1))))
(+ (* lambda2 (+ (* -2 (/ (* R lambda1) phi1)) (/ (* R lambda2) phi1))) (/ (* R (pow lambda1 2)) phi1))
(+.f64 (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1)) (.f64 lambda2 (+.f64 (/.f64 (.f64 R lambda2) phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda1)) phi1))))
(/ (* R (pow lambda2 2)) phi1)
(/.f64 (.f64 R (.f64 lambda2 lambda2)) phi1)
(* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (/ R phi1)))
(.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 R phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda1)) (*.f64 phi1 lambda2))))
(* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (+ (/ R phi1) (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (+.f64 (/.f64 R phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda1)) (.f64 phi1 lambda2))) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 (*.f64 lambda2 lambda2)))))
(* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (+ (/ R phi1) (/ (* R (pow lambda1 2)) (* (pow lambda2 2) phi1)))))
(.f64 (.f64 lambda2 lambda2) (+.f64 (+.f64 (/.f64 R phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda1)) (.f64 phi1 lambda2))) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (.f64 phi1 (*.f64 lambda2 lambda2)))))
(/ (* R (pow lambda2 2)) phi1)
(/.f64 (.f64 R (.f64 lambda2 lambda2)) phi1)
(* (pow lambda2 2) (+ (* -2 (/ (* R lambda1) (* lambda2 phi1))) (/ R phi1)))
(.f64 (.f64 lambda2 lambda2) (+.f64 (/.f64 R phi1) (/.f64 (.f64 #s(literal -2 binary64) (.f64 R lambda1)) (*.f64 phi1 lambda2))))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) (* lambda2 phi1))) (* 2 (/ (* R lambda1) phi1))) lambda2)) (/ R phi1)))
(.f64 (.f64 lambda2 lambda2) (-.f64 (/.f64 R phi1) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 R lambda1) phi1)) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (*.f64 phi1 lambda2))) lambda2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* R (pow lambda1 2)) (* lambda2 phi1))) (* 2 (/ (* R lambda1) phi1))) lambda2)) (/ R phi1)))
(.f64 (.f64 lambda2 lambda2) (-.f64 (/.f64 R phi1) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 R lambda1) phi1)) (/.f64 (.f64 R (.f64 lambda1 lambda1)) (*.f64 phi1 lambda2))) lambda2)))
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (pow (- lambda1 lambda2) 2)) phi1)
(/.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R lambda1) lambda2)
(/.f64 (*.f64 R lambda1) lambda2)
(+ (* -1/8 (/ (* R (* lambda1 (pow phi1 2))) lambda2)) (/ (* R lambda1) lambda2))
(+.f64 (/.f64 (.f64 R lambda1) lambda2) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (*.f64 phi1 phi1))) lambda2))
(+ (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda1) lambda2)) (* 1/384 (/ (* R (* lambda1 (pow phi1 2))) lambda2)))) (/ (* R lambda1) lambda2))
(+.f64 (/.f64 (.f64 R lambda1) lambda2) (.f64 (.f64 phi1 phi1) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 R lambda1)) lambda2) (/.f64 (.f64 (.f64 R #s(literal 1/384 binary64)) (.f64 lambda1 (*.f64 phi1 phi1))) lambda2))))
(+ (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda1) lambda2)) (* (pow phi1 2) (+ (* -1/46080 (/ (* R (* lambda1 (pow phi1 2))) lambda2)) (* 1/384 (/ (* R lambda1) lambda2)))))) (/ (* R lambda1) lambda2))
(+.f64 (/.f64 (.f64 R lambda1) lambda2) (.f64 (.f64 phi1 phi1) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 R lambda1)) lambda2) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal 1/384 binary64) (/.f64 (.f64 R lambda1) lambda2)) (/.f64 (.f64 (.f64 R #s(literal -1/46080 binary64)) (.f64 lambda1 (*.f64 phi1 phi1))) lambda2))))))
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)
(/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R lambda1)
(*.f64 R lambda1)
(+ (* -1/8 (* R (* lambda1 (pow phi1 2)))) (* R lambda1))
(+.f64 (.f64 R lambda1) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (*.f64 phi1 phi1))))
(+ (* R lambda1) (* (pow phi1 2) (+ (* -1/8 (* R lambda1)) (* 1/384 (* R (* lambda1 (pow phi1 2)))))))
(+.f64 (.f64 R lambda1) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 R lambda1)) (.f64 (.f64 R #s(literal 1/384 binary64)) (.f64 lambda1 (*.f64 phi1 phi1))))))
(+ (* R lambda1) (* (pow phi1 2) (+ (* -1/8 (* R lambda1)) (* (pow phi1 2) (+ (* -1/46080 (* R (* lambda1 (pow phi1 2)))) (* 1/384 (* R lambda1)))))))
(+.f64 (.f64 R lambda1) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 R lambda1)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 R #s(literal -1/46080 binary64)) (.f64 lambda1 (.f64 phi1 phi1))) (.f64 #s(literal 1/384 binary64) (*.f64 R lambda1)))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))

eval289.0ms (1.7%)

Compiler: Compiled 46859 to 3382 computations (92.8% saved)

prune232.0ms (1.4%)

Pruning

63 alts after pruning (59 fresh and 4 done)

	Pruned	Kept	Total
New	1352	10	1362
Fresh	5	49	54
Picked	4	1	5
Done	0	3	3
Total	1361	63	1424

Accuracy

98.0%

Counts

1424 → 63

Alt Table

Click to see full alt table

Status	Accuracy	Program
	7.0%	(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))
	23.7%	(-.f64 #s(literal 0 binary64) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 R lambda1)))
	20.8%	(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
	23.7%	(-.f64 #s(literal 0 binary64) (.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 R lambda1)))
	22.0%	(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
	21.4%	(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
	23.9%	(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
	24.5%	(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
	43.8%	(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
	26.8%	(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
	39.4%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
	37.1%	(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (neg.f64 lambda1))
	48.5%	(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
	34.4%	(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
	22.6%	(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (neg.f64 (*.f64 R lambda1)))
	24.8%	(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
	22.0%	(.f64 (.f64 R (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) lambda2)
	22.0%	(.f64 (.f64 R (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)
	5.9%	(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	26.2%	(.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)
	22.5%	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
	8.6%	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2))
	20.9%	(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
	23.4%	(.f64 (.f64 R lambda2) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 phi2))))))
	10.7%	(.f64 (.f64 R lambda2) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
✓	22.8%	(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
	23.5%	(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
	23.7%	(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
	20.2%	(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
	20.9%	(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
	7.3%	(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	6.6%	(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
	26.2%	(.f64 (neg.f64 (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
	29.2%	(*.f64 (neg.f64 phi1) R)
	51.9%	(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
	45.8%	(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
	9.0%	(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
	69.2%	(.f64 R (hypot.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
	82.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
	72.2%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 #s(literal -1/8 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2)))
	73.6%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/8 binary64) phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
	72.9%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal 1/48 binary64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
	69.1%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))
✓	91.3%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
	74.7%	(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2)))
	74.8%	(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
	24.8%	(.f64 R (hypot.f64 (exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64))) (-.f64 phi1 phi2)))
	72.8%	(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
	22.0%	(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
	8.5%	(.f64 R (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
	5.9%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
	23.9%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)))
	22.8%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
	7.3%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
	8.6%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
	24.5%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
	20.9%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
	6.6%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
	41.0%	(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
	37.4%	(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
	58.2%	(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
✓	31.8%	(*.f64 R phi2)
✓	24.0%	(*.f64 R lambda2)

Compiler

Compiled 3011 to 1286 computations (57.3% saved)

regimes380.0ms (2.3%)

Counts

97 → 1

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(.f64 (.f64 R lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 (.f64 R lambda2) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (neg.f64 (.f64 R lambda1)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 (neg.f64 (.f64 R lambda2)) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 R (.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda1)) (neg.f64 lambda1))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(.f64 lambda1 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda2)) lambda1)) (neg.f64 lambda1))
(.f64 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(.f64 R (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) lambda2))
(.f64 (.f64 R (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)
(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (*.f64 phi2 #s(literal -1/2 binary64)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/8 binary64))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (neg.f64 (*.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 R lambda1)))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 R lambda1)) #s(literal 3 binary64))) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (.f64 (.f64 R lambda1) (.f64 R lambda1))))
(.f64 R (hypot.f64 (exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (exp.f64 (.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64))) (-.f64 phi1 phi2)))
(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
(.f64 (.f64 R (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) lambda2)
(-.f64 #s(literal 0 binary64) (.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 R lambda1)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 #s(literal -1/8 binary64) phi2)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 #s(literal -1/8 binary64) phi1)) (.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (-.f64 phi1 phi2)))
(.f64 (.f64 R lambda2) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 #s(literal 1/4 binary64) (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 phi2 phi2))))))
(.f64 R (.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2))
(.f64 (.f64 R (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) lambda2)
(-.f64 #s(literal 0 binary64) (.f64 (fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 R lambda1)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal 1/48 binary64))))) (.f64 #s(literal -1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 #s(literal -1/2 binary64)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 phi2 #s(literal -1/2 binary64)) (.f64 phi2 #s(literal -1/2 binary64)))))))) (-.f64 phi1 phi2)))

Outputs
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))

Calls

9 calls:

98.0ms	lambda2
51.0ms	(+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
39.0ms	phi2
37.0ms	lambda1
36.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
95.3%	1	`R`
95.3%	1	`lambda1`
95.3%	1	`lambda2`
95.3%	1	`phi1`
95.3%	1	`phi2`
95.3%	1	`(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))`
95.3%	1	`(sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))`
95.3%	1	`(+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))`
95.3%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 144 to 79 computations (45.1% saved)

regimes143.0ms (0.9%)

Counts

58 → 2

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))

Outputs

(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))

(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))

Calls

6 calls:

40.0ms	lambda1
24.0ms	(-.f64 lambda1 lambda2)
22.0ms	phi2
18.0ms	phi1
16.0ms	R

Results

Accuracy	Segments	Branch
95.4%	2	`phi2`
91.3%	1	`R`
91.3%	1	`lambda1`
91.3%	1	`lambda2`
95.4%	2	`phi1`
91.3%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes108.0ms (0.6%)

Counts

57 → 1

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))

Outputs
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))

Calls

4 calls:

49.0ms	R
19.0ms	phi1
17.0ms	phi2
16.0ms	lambda2

Results

Accuracy	Segments	Branch
91.3%	1	`R`
91.3%	1	`lambda2`
91.3%	1	`phi1`
91.3%	1	`phi2`

Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes132.0ms (0.8%)

Counts

56 → 2

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) phi1))

Outputs
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))

Calls

6 calls:

32.0ms	lambda2
21.0ms	lambda1
17.0ms	(-.f64 lambda1 lambda2)
16.0ms	phi1
16.0ms	R

Results

Accuracy	Segments	Branch
85.4%	1	`phi2`
85.4%	1	`lambda1`
85.4%	1	`phi1`
85.4%	1	`(-.f64 lambda1 lambda2)`
85.4%	1	`R`
87.4%	2	`lambda2`

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes22.0ms (0.1%)

Counts

54 → 2

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))

Outputs
(.f64 R (hypot.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))

Calls

1 calls:

15.0ms

lambda2

Results

Accuracy	Segments	Branch
87.2%	2	`lambda2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes68.0ms (0.4%)

Counts

53 → 1

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))

Outputs
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))

Calls

2 calls:

46.0ms	lambda2
17.0ms	phi1

Results

Accuracy	Segments	Branch
85.4%	1	`phi1`
85.4%	1	`lambda2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes94.0ms (0.6%)

Counts

34 → 2

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))

Outputs
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))

Calls

6 calls:

24.0ms	phi2
18.0ms	(-.f64 lambda1 lambda2)
10.0ms	lambda1
10.0ms	phi1
10.0ms	R

Results

Accuracy	Segments	Branch
72.8%	1	`R`
80.7%	2	`lambda2`
77.0%	2	`(-.f64 lambda1 lambda2)`
77.4%	2	`lambda1`
83.6%	2	`phi2`
82.7%	2	`phi1`

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes53.0ms (0.3%)

Counts

23 → 2

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))

Outputs
(*.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2)))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))

Calls

5 calls:

21.0ms	(-.f64 lambda1 lambda2)
7.0ms	phi2
7.0ms	phi1
7.0ms	lambda1
7.0ms	lambda2

Results

Accuracy	Segments	Branch
74.9%	2	`(-.f64 lambda1 lambda2)`
75.3%	2	`lambda1`
77.0%	2	`lambda2`
75.9%	3	`phi1`
72.8%	1	`phi2`

Compiler

Compiled 32 to 26 computations (18.8% saved)

regimes46.0ms (0.3%)

Counts

22 → 3

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(.f64 (.f64 lambda1 lambda1) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (/.f64 (.f64 phi1 (-.f64 R (+.f64 (/.f64 (.f64 R phi2) phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 lambda2 lambda2))) (.f64 phi1 phi1))))) lambda1) (/.f64 (.f64 R lambda2) phi1)) lambda1)))

Outputs

(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))

(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 R lambda1) lambda2)))

(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))

Calls

6 calls:

9.0ms	R
7.0ms	(-.f64 lambda1 lambda2)
7.0ms	phi1
7.0ms	lambda1
7.0ms	phi2

Results

Accuracy	Segments	Branch
71.6%	3	`phi2`
63.5%	4	`R`
70.2%	3	`phi1`
62.6%	2	`(-.f64 lambda1 lambda2)`
62.9%	3	`lambda1`
60.0%	2	`lambda2`

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes24.0ms (0.1%)

Counts

20 → 3

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1)))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64)) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64)))) (.f64 R lambda1)))
(.f64 R (.f64 lambda2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))

Outputs

(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (/.f64 (*.f64 lambda1 lambda1) phi1))) phi1)))

(*.f64 lambda2 (-.f64 R (/.f64 (*.f64 R lambda1) lambda2)))

(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))

Calls

1 calls:

22.0ms

phi2

Results

Accuracy	Segments	Branch
70.8%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes6.0ms (0%)

Counts

15 → 3

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi1) #s(literal -1/4 binary64))))
(-.f64 #s(literal 0 binary64) (.f64 lambda1 (-.f64 R (/.f64 (.f64 R lambda2) lambda1))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) #s(literal -1/8 binary64))) (.f64 R lambda1)))
(-.f64 #s(literal 0 binary64) (.f64 (/.f64 (.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(.f64 (.f64 R lambda2) (+.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 (.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64))))))

Outputs
(*.f64 (neg.f64 phi1) R)
(.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2)))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))

Calls

1 calls:

5.0ms

phi2

Results

Accuracy	Segments	Branch
70.4%	3	`phi2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes8.0ms (0%)

Counts

7 → 3

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))

Outputs
(*.f64 (neg.f64 phi1) R)
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))

Calls

2 calls:

4.0ms	phi1
3.0ms	phi2

Results

Accuracy	Segments	Branch
67.1%	4	`phi1`
68.8%	3	`phi2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes6.0ms (0%)

Counts

6 → 3

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))

Outputs
(*.f64 (neg.f64 phi1) R)
(.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R phi2)

Calls

2 calls:

3.0ms	phi1
3.0ms	phi2

Results

Accuracy	Segments	Branch
63.3%	3	`phi1`
64.6%	3	`phi2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes14.0ms (0.1%)

Counts

5 → 4

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))

Outputs
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(*.f64 R lambda2)
(*.f64 R phi2)

Calls

5 calls:

4.0ms	R
2.0ms	lambda1
2.0ms	phi2
2.0ms	phi1
2.0ms	lambda2

Results

Accuracy	Segments	Branch
49.2%	3	`lambda2`
37.2%	3	`R`
51.5%	4	`lambda1`
58.6%	4	`phi1`
56.1%	3	`phi2`

Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes4.0ms (0%)

Counts

3 → 3

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)

Outputs
(*.f64 (neg.f64 phi1) R)
(*.f64 R lambda2)
(*.f64 R phi2)

Calls

2 calls:

2.0ms	phi1
2.0ms	phi2

Results

Accuracy	Segments	Branch
54.9%	3	`phi2`
54.6%	3	`phi1`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes12.0ms (0.1%)

Counts

2 → 2

Calls

Call 1

Inputs
(*.f64 R lambda2)
(*.f64 R phi2)

Outputs
(*.f64 R lambda2)
(*.f64 R phi2)

Calls

4 calls:

7.0ms	lambda2
2.0ms	phi1
2.0ms	lambda1
2.0ms	phi2

Results

Accuracy	Segments	Branch
43.1%	2	`lambda2`
36.1%	2	`lambda1`
38.4%	4	`phi1`
46.6%	2	`phi2`

Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes7.0ms (0%)

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

Counts

1 → 1

Calls

Call 1

Inputs
(*.f64 R lambda2)

Outputs
(*.f64 R lambda2)

Calls

5 calls:

1.0ms	lambda2
1.0ms	phi2
1.0ms	lambda1
1.0ms	phi1
1.0ms	R

Results

Accuracy	Segments	Branch
24.0%	1	`phi1`
24.0%	1	`R`
24.0%	1	`lambda1`
24.0%	1	`lambda2`
24.0%	1	`phi2`

Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch32.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
30.0ms	5.171774198174419e-7	1.578974897790284e-5

Results

15.0ms	21×	1	valid
11.0ms	91×	0	valid

Compiler

Compiled 325 to 220 computations (32.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 12.0ms

ival-mult: 4.0ms (34% of total)

ival-sub: 2.0ms (17% of total)

ival-cos: 2.0ms (17% of total)

ival-add: 1.0ms (8.5% of total)

ival-div: 1.0ms (8.5% of total)

ival-sqrt: 1.0ms (8.5% of total)

const: 0.0ms (0% of total)

backward-pass: 0.0ms (0% of total)

bsearch27.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
26.0ms	7.925233138240616e-44	3.8022452014413026e-42

Results

20.0ms	52×	0	valid
3.0ms	12×	1	valid

Compiler

Compiled 177 to 116 computations (34.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 7.0ms

ival-mult: 2.0ms (30.3% of total)

ival-add: 1.0ms (15.2% of total)

ival-div: 1.0ms (15.2% of total)

ival-sub: 1.0ms (15.2% of total)

ival-cos: 1.0ms (15.2% of total)

ival-sqrt: 1.0ms (15.2% of total)

const: 0.0ms (0% of total)

backward-pass: 0.0ms (0% of total)

bsearch3.0ms (0%)

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
3.0ms	1.9723276609334852e-116	1.8555789881297975e-109

Results

2.0ms

16×

valid

Compiler

Compiled 78 to 47 computations (39.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 1.0ms

ival-mult: 1.0ms (81.9% of total)

ival-div: 0.0ms (0% of total)

ival-sub: 0.0ms (0% of total)

ival-add: 0.0ms (0% of total)

ival-cos: 0.0ms (0% of total)

const: 0.0ms (0% of total)

ival-sqrt: 0.0ms (0% of total)

backward-pass: 0.0ms (0% of total)

bsearch30.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
27.0ms	1.0571379741369369e+26	1.709603565523108e+28

Results

14.0ms	50×	1	valid
9.0ms	62×	0	valid

Compiler

Compiled 227 to 150 computations (33.9% saved)

Precisions

Click to see histograms. Total time spent on operations: 17.0ms

ival-mult: 5.0ms (29.7% of total)

ival-cos: 4.0ms (23.8% of total)

ival-sub: 3.0ms (17.8% of total)

ival-add: 2.0ms (11.9% of total)

ival-div: 1.0ms (5.9% of total)

ival-sqrt: 1.0ms (5.9% of total)

backward-pass: 1.0ms (5.9% of total)

const: 0.0ms (0% of total)

bsearch19.0ms (0.1%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
16.0ms	1.928003462634007e+127	5.739354632288843e+127

Results

7.0ms	58×	0	valid
6.0ms	22×	1	valid

Compiler

Compiled 185 to 124 computations (33% saved)

Precisions

Click to see histograms. Total time spent on operations: 9.0ms

ival-mult: 3.0ms (33.9% of total)

ival-cos: 2.0ms (22.6% of total)

ival-add: 1.0ms (11.3% of total)

ival-div: 1.0ms (11.3% of total)

ival-sub: 1.0ms (11.3% of total)

ival-sqrt: 1.0ms (11.3% of total)

const: 0.0ms (0% of total)

backward-pass: 0.0ms (0% of total)

bsearch67.0ms (0.4%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
30.0ms	1.0571379741369369e+26	1.709603565523108e+28
32.0ms	-2.660622342585731e-242	-1.5973137654293752e-245

Results

30.0ms	170×	0	valid
24.0ms	70×	1	valid

Compiler

Compiled 623 to 403 computations (35.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 32.0ms

ival-mult: 9.0ms (28.1% of total)

ival-add: 7.0ms (21.9% of total)

ival-cos: 6.0ms (18.7% of total)

ival-sub: 4.0ms (12.5% of total)

ival-div: 2.0ms (6.2% of total)

ival-sqrt: 2.0ms (6.2% of total)

backward-pass: 1.0ms (3.1% of total)

const: 0.0ms (0% of total)

bsearch81.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
43.0ms	1.0571379741369369e+26	1.709603565523108e+28
24.0ms	-2.660622342585731e-242	-1.5973137654293752e-245

Results

38.0ms	73×	1	valid
20.0ms	167×	0	valid

Compiler

Compiled 559 to 379 computations (32.2% saved)

Precisions

Click to see histograms. Total time spent on operations: 46.0ms

ival-cos: 23.0ms (50.2% of total)

ival-mult: 9.0ms (19.7% of total)

ival-sub: 4.0ms (8.7% of total)

ival-add: 3.0ms (6.6% of total)

ival-div: 2.0ms (4.4% of total)

ival-sqrt: 2.0ms (4.4% of total)

backward-pass: 1.0ms (2.2% of total)

const: 0.0ms (0% of total)

bsearch90.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
42.0ms	1.0571379741369369e+26	1.709603565523108e+28
43.0ms	-2.1528651901941885e-215	-2.551178509781706e-228

Results

52.0ms	78×	1	valid
23.0ms	194×	0	valid

Compiler

Compiled 505 to 351 computations (30.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 45.0ms

backward-pass: 15.0ms (33.2% of total)

ival-mult: 10.0ms (22.1% of total)

ival-cos: 7.0ms (15.5% of total)

ival-sub: 4.0ms (8.9% of total)

ival-add: 3.0ms (6.6% of total)

ival-div: 3.0ms (6.6% of total)

ival-sqrt: 3.0ms (6.6% of total)

const: 0.0ms (0% of total)

bsearch81.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
37.0ms	1.0571379741369369e+26	1.709603565523108e+28
39.0ms	-2.1528651901941885e-215	-2.551178509781706e-228

Results

45.0ms	84×	1	valid
22.0ms	188×	0	valid

Compiler

Compiled 505 to 368 computations (27.1% saved)

Precisions

Click to see histograms. Total time spent on operations: 53.0ms

ival-mult: 19.0ms (36.1% of total)

ival-add: 15.0ms (28.5% of total)

ival-cos: 7.0ms (13.3% of total)

ival-sub: 4.0ms (7.6% of total)

ival-div: 3.0ms (5.7% of total)

ival-sqrt: 3.0ms (5.7% of total)

backward-pass: 2.0ms (3.8% of total)

const: 0.0ms (0% of total)

bsearch69.0ms (0.4%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
27.0ms	1.0571379741369369e+26	1.709603565523108e+28
35.0ms	-2.1528651901941885e-215	-2.551178509781706e-228

Results

32.0ms	198×	0	valid
21.0ms	74×	1	valid

Compiler

Compiled 463 to 340 computations (26.6% saved)

Precisions

Click to see histograms. Total time spent on operations: 39.0ms

ival-sub: 11.0ms (28.6% of total)

ival-mult: 10.0ms (26% of total)

ival-cos: 6.0ms (15.6% of total)

ival-add: 3.0ms (7.8% of total)

ival-div: 3.0ms (7.8% of total)

ival-sqrt: 3.0ms (7.8% of total)

backward-pass: 2.0ms (5.2% of total)

const: 0.0ms (0% of total)

bsearch99.0ms (0.6%)

Algorithm

3×	binary-search

Stop Event

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

Steps

Time	Left	Right
43.0ms	1.294783369297127e-232	1.2797113281779113e-224
27.0ms	3.6585575824078094e-295	1.4729268373073637e-285
22.0ms	-8.457460511305994e-91	-4.779967757172403e-92

Results

39.0ms	325×	0	valid
39.0ms	75×	1	valid

Compiler

Compiled 534 to 413 computations (22.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 45.0ms

ival-mult: 16.0ms (35.6% of total)

ival-cos: 8.0ms (17.8% of total)

ival-sub: 6.0ms (13.4% of total)

ival-add: 5.0ms (11.1% of total)

ival-div: 4.0ms (8.9% of total)

ival-sqrt: 4.0ms (8.9% of total)

backward-pass: 2.0ms (4.5% of total)

const: 1.0ms (2.2% of total)

bsearch69.0ms (0.4%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
35.0ms	1.0571379741369369e+26	1.709603565523108e+28
30.0ms	-5.096153060562028e-294	-2.952215024690986e-294

Results

38.0ms	104×	0	valid
21.0ms	72×	1	valid

Compiler

Compiled 247 to 182 computations (26.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 42.0ms

ival-cos: 24.0ms (57.2% of total)

ival-mult: 7.0ms (16.7% of total)

ival-sub: 3.0ms (7.1% of total)

ival-add: 2.0ms (4.8% of total)

ival-div: 2.0ms (4.8% of total)

ival-sqrt: 2.0ms (4.8% of total)

backward-pass: 1.0ms (2.4% of total)

const: 0.0ms (0% of total)

bsearch60.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
58.0ms	1.0571379741369369e+26	1.709603565523108e+28

Results

46.0ms	49×	1	valid
8.0ms	63×	0	valid

Compiler

Compiled 171 to 122 computations (28.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 16.0ms

ival-mult: 5.0ms (32.1% of total)

ival-cos: 4.0ms (25.7% of total)

ival-add: 2.0ms (12.8% of total)

ival-sub: 2.0ms (12.8% of total)

ival-div: 1.0ms (6.4% of total)

ival-sqrt: 1.0ms (6.4% of total)

backward-pass: 1.0ms (6.4% of total)

const: 0.0ms (0% of total)

simplify85.0ms (0.5%)

Algorithm

1×	egg-herbie

Rules

680×	`distribute-lft-neg-in_binary64`
434×	`neg-mul-1_binary64`
344×	`neg-sub0_binary64`
296×	`cancel-sign-sub_binary64`
256×	`distribute-rgt-neg-in_binary64`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	130	392
1	196	392
2	252	392
3	307	392
4	352	390
5	415	390
6	525	390
7	739	390
8	973	390
9	1174	390
10	1395	390
11	1624	390
12	1838	390
13	1987	390
14	2058	390
15	2074	390

Stop Event

1×

saturated

Calls

Call 1

Inputs
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 2420212822470693/1180591620717411303424 binary64)) (.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(if (<=.f64 lambda2 #s(literal 7532522082464017/12554203470773361527671578846415332832204710888928069025792 binary64)) (.f64 R (hypot.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda2 #s(literal 3549017208474643/177450860423732151013018507785157357019931972824052260810910693159335763699560039874558361990664932998233037501529828597054346100736 binary64)) (.f64 R (hypot.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 135000000000000000419430400 binary64)) (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))))
(if (<=.f64 lambda2 #s(literal 41999999999999998347513240972954311636143758478238912900884322134787073651649528897946642811387745274331621419625502296317624320 binary64)) (.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))))
(if (<=.f64 phi2 #s(literal -6246254001565511/240240538521750407359077046256296219561976306993584113173692780504404210003815414654317126354570604187153728613910574803813846101321671784376366749012476965121271261522908882474772107196452653194239352573372884036938570849429907747816467644391667125314387968 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) (if (<=.f64 phi2 #s(literal 110000000000000003523215360 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -6246254001565511/240240538521750407359077046256296219561976306993584113173692780504404210003815414654317126354570604187153728613910574803813846101321671784376366749012476965121271261522908882474772107196452653194239352573372884036938570849429907747816467644391667125314387968 binary64)) (.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1))) (if (<=.f64 phi2 #s(literal 170000000000000013254000640 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -8344784746116311/388129523075177233787244872115625638814221504279174152784763009506512738171594221582719602207161619487621932674282768301542895011028703597861071818760295284801113744005212476387566321407899611206315749798429117187723211713454014464 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 110000000000000003523215360 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -5123309704592339/3105036184601417870297958976925005110513772034233393222278104076052101905372753772661756817657292955900975461394262146412343160088229628782888574550082362278408909952041699811100530571263196889650525998387432937501785693707632115712 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 144999999999999999177916416 binary64)) (.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -6706878158739063/12420144738405671481191835907700020442055088136933572889112416304208407621491015090647027270629171823603901845577048585649372640352918515131554298200329449113635639808166799244402122285052787558602103993549731750007142774830528462848 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 480000000000000009126805504 binary64)) (.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (.f64 R phi2)))
(if (<=.f64 phi1 #s(literal -481634709357915/573374653997517877902705223825521735199141247292070280934397209846730719022121202017504638277531421638656 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi1 #s(literal 790984979339419/179769313486231590772930519078902473361797697894230657273430081157732675805500963132708477322407536021120113879871393357658789768814416622492847430639474124377767893424865485276302219601246094119453082952085005768838150682342462881473913110540827237163350510684586298239947245938479716304835356329624224137216 binary64)) (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (if (<=.f64 phi1 #s(literal 1083747584805571/1747979975492856518824388667826833403974715525645181428798916607807071777670465341756914322865272727992514618482604963383447074020817466839626771608982213111603568988524121832413745194182066575698549805189925857389888339453536229468710863470854144 binary64)) (.f64 R lambda2) (.f64 R phi2))))
(if (<=.f64 phi2 #s(literal -6471695285504337/1438154507889852726183444152631219786894381583153845258187440649261861406444007705061667818579260288168960911038971146861270318150515332979942779445115792995022143147398923882210417756809968752955624663616680046150705205458739703051791304884326617897306804085476690385919577967507837730438682850636993793097728 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 1600000000000000076235669504 binary64)) (.f64 R lambda2) (*.f64 R phi2)))
(if (<=.f64 phi2 #s(literal 144999999999999999177916416 binary64)) (.f64 R lambda2) (.f64 R phi2))
(*.f64 R lambda2)

Outputs
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 2420212822470693/1180591620717411303424 binary64)) (.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2))))
(if (<=.f64 phi2 #s(literal 2420212822470693/1180591620717411303424 binary64)) (.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 lambda2 #s(literal 7532522082464017/12554203470773361527671578846415332832204710888928069025792 binary64)) (.f64 R (hypot.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda2 #s(literal 7532522082464017/12554203470773361527671578846415332832204710888928069025792 binary64)) (.f64 R (hypot.f64 (.f64 lambda1 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda2 #s(literal 3549017208474643/177450860423732151013018507785157357019931972824052260810910693159335763699560039874558361990664932998233037501529828597054346100736 binary64)) (.f64 R (hypot.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda2 #s(literal 3549017208474643/177450860423732151013018507785157357019931972824052260810910693159335763699560039874558361990664932998233037501529828597054346100736 binary64)) (.f64 R (hypot.f64 (.f64 lambda1 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2))) (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 135000000000000000419430400 binary64)) (.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))))
(if (<=.f64 lambda2 #s(literal 41999999999999998347513240972954311636143758478238912900884322134787073651649528897946642811387745274331621419625502296317624320 binary64)) (.f64 R (hypot.f64 lambda1 (-.f64 phi1 phi2))) (.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))))
(if (<=.f64 phi2 #s(literal -6246254001565511/240240538521750407359077046256296219561976306993584113173692780504404210003815414654317126354570604187153728613910574803813846101321671784376366749012476965121271261522908882474772107196452653194239352573372884036938570849429907747816467644391667125314387968 binary64)) (.f64 (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (-.f64 #s(literal 1 binary64) (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))) (if (<=.f64 phi2 #s(literal 110000000000000003523215360 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -6246254001565511/240240538521750407359077046256296219561976306993584113173692780504404210003815414654317126354570604187153728613910574803813846101321671784376366749012476965121271261522908882474772107196452653194239352573372884036938570849429907747816467644391667125314387968 binary64)) (.f64 (.f64 R phi1) (+.f64 (+.f64 (/.f64 phi2 phi1) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))) #s(literal -1 binary64))) (if (<=.f64 phi2 #s(literal 110000000000000003523215360 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -6246254001565511/240240538521750407359077046256296219561976306993584113173692780504404210003815414654317126354570604187153728613910574803813846101321671784376366749012476965121271261522908882474772107196452653194239352573372884036938570849429907747816467644391667125314387968 binary64)) (.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1))) (if (<=.f64 phi2 #s(literal 170000000000000013254000640 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -6246254001565511/240240538521750407359077046256296219561976306993584113173692780504404210003815414654317126354570604187153728613910574803813846101321671784376366749012476965121271261522908882474772107196452653194239352573372884036938570849429907747816467644391667125314387968 binary64)) (.f64 phi1 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (/.f64 (.f64 lambda1 lambda1) phi1))) phi1) R)) (if (<=.f64 phi2 #s(literal 170000000000000013254000640 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -8344784746116311/388129523075177233787244872115625638814221504279174152784763009506512738171594221582719602207161619487621932674282768301542895011028703597861071818760295284801113744005212476387566321407899611206315749798429117187723211713454014464 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 110000000000000003523215360 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -8344784746116311/388129523075177233787244872115625638814221504279174152784763009506512738171594221582719602207161619487621932674282768301542895011028703597861071818760295284801113744005212476387566321407899611206315749798429117187723211713454014464 binary64)) (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (if (<=.f64 phi2 #s(literal 110000000000000003523215360 binary64)) (.f64 lambda2 (-.f64 R (/.f64 (.f64 R lambda1) lambda2))) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -5123309704592339/3105036184601417870297958976925005110513772034233393222278104076052101905372753772661756817657292955900975461394262146412343160088229628782888574550082362278408909952041699811100530571263196889650525998387432937501785693707632115712 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 144999999999999999177916416 binary64)) (.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -5123309704592339/3105036184601417870297958976925005110513772034233393222278104076052101905372753772661756817657292955900975461394262146412343160088229628782888574550082362278408909952041699811100530571263196889650525998387432937501785693707632115712 binary64)) (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (if (<=.f64 phi2 #s(literal 144999999999999999177916416 binary64)) (.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal -6706878158739063/12420144738405671481191835907700020442055088136933572889112416304208407621491015090647027270629171823603901845577048585649372640352918515131554298200329449113635639808166799244402122285052787558602103993549731750007142774830528462848 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 480000000000000009126805504 binary64)) (.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (.f64 R phi2)))
(if (<=.f64 phi2 #s(literal -6706878158739063/12420144738405671481191835907700020442055088136933572889112416304208407621491015090647027270629171823603901845577048585649372640352918515131554298200329449113635639808166799244402122285052787558602103993549731750007142774830528462848 binary64)) (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (if (<=.f64 phi2 #s(literal 480000000000000009126805504 binary64)) (.f64 R (.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (.f64 R phi2)))
(if (<=.f64 phi1 #s(literal -481634709357915/573374653997517877902705223825521735199141247292070280934397209846730719022121202017504638277531421638656 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi1 #s(literal 790984979339419/179769313486231590772930519078902473361797697894230657273430081157732675805500963132708477322407536021120113879871393357658789768814416622492847430639474124377767893424865485276302219601246094119453082952085005768838150682342462881473913110540827237163350510684586298239947245938479716304835356329624224137216 binary64)) (-.f64 #s(literal 0 binary64) (.f64 R lambda1)) (if (<=.f64 phi1 #s(literal 1083747584805571/1747979975492856518824388667826833403974715525645181428798916607807071777670465341756914322865272727992514618482604963383447074020817466839626771608982213111603568988524121832413745194182066575698549805189925857389888339453536229468710863470854144 binary64)) (.f64 R lambda2) (.f64 R phi2))))
(if (<=.f64 phi1 #s(literal -481634709357915/573374653997517877902705223825521735199141247292070280934397209846730719022121202017504638277531421638656 binary64)) (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (if (<=.f64 phi1 #s(literal 790984979339419/179769313486231590772930519078902473361797697894230657273430081157732675805500963132708477322407536021120113879871393357658789768814416622492847430639474124377767893424865485276302219601246094119453082952085005768838150682342462881473913110540827237163350510684586298239947245938479716304835356329624224137216 binary64)) (.f64 R (-.f64 #s(literal 0 binary64) lambda1)) (if (<=.f64 phi1 #s(literal 1083747584805571/1747979975492856518824388667826833403974715525645181428798916607807071777670465341756914322865272727992514618482604963383447074020817466839626771608982213111603568988524121832413745194182066575698549805189925857389888339453536229468710863470854144 binary64)) (.f64 R lambda2) (.f64 R phi2))))
(if (<=.f64 phi2 #s(literal -6471695285504337/1438154507889852726183444152631219786894381583153845258187440649261861406444007705061667818579260288168960911038971146861270318150515332979942779445115792995022143147398923882210417756809968752955624663616680046150705205458739703051791304884326617897306804085476690385919577967507837730438682850636993793097728 binary64)) (.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 1600000000000000076235669504 binary64)) (.f64 R lambda2) (*.f64 R phi2)))
(if (<=.f64 phi2 #s(literal -6471695285504337/1438154507889852726183444152631219786894381583153845258187440649261861406444007705061667818579260288168960911038971146861270318150515332979942779445115792995022143147398923882210417756809968752955624663616680046150705205458739703051791304884326617897306804085476690385919577967507837730438682850636993793097728 binary64)) (-.f64 #s(literal 0 binary64) (.f64 R phi1)) (if (<=.f64 phi2 #s(literal 1600000000000000076235669504 binary64)) (.f64 R lambda2) (*.f64 R phi2)))
(if (<=.f64 phi2 #s(literal 144999999999999999177916416 binary64)) (.f64 R lambda2) (.f64 R phi2))
(*.f64 R lambda2)

soundness2.7s (16.3%)

Rules

7762×	`-lowering-.f32`
7762×	`-lowering-.f64`
7318×	`-lowering-.f32`
7318×	`-lowering-.f64`
7134×	`-lowering-.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1382	13134
1	4826	12187
0	8041	12187
0	17	16
1	34	16
2	83	16
3	317	16
4	1522	16
5	5145	16
0	8138	16
0	42	212
1	217	207
2	2019	207
0	8684	207
0	745	6936
1	2615	6244
0	8481	6244
0	1539	17438
1	5541	17011
0	8264	17011
0	1526	22044
1	5631	21281
0	8126	21281

Stop Event

1×	fuel
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit

Compiler

Compiled 2323 to 1441 computations (38% saved)

preprocess174.0ms (1%)

Remove

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 1764 to 796 computations (54.9% saved)

analyze706.0ms (4.2%)

sample2.2s (12.8%)

preprocess272.0ms (1.6%)

explain595.0ms (3.5%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify177.0ms (1%)

localize153.0ms (0.9%)

series55.0ms (0.3%)

rewrite436.0ms (2.6%)

simplify412.0ms (2.4%)

eval51.0ms (0.3%)

prune94.0ms (0.6%)

simplify221.0ms (1.3%)

localize393.0ms (2.3%)

series164.0ms (1%)

rewrite435.0ms (2.6%)

simplify592.0ms (3.5%)

eval215.0ms (1.3%)

prune221.0ms (1.3%)

simplify185.0ms (1.1%)

localize312.0ms (1.9%)

series90.0ms (0.5%)

rewrite493.0ms (2.9%)

simplify575.0ms (3.4%)

eval236.0ms (1.4%)

prune322.0ms (1.9%)

simplify286.0ms (1.7%)

localize431.0ms (2.6%)

series155.0ms (0.9%)

rewrite450.0ms (2.7%)

simplify595.0ms (3.5%)

eval289.0ms (1.7%)

prune232.0ms (1.4%)

regimes380.0ms (2.3%)

regimes143.0ms (0.9%)

regimes108.0ms (0.6%)

regimes132.0ms (0.8%)

regimes22.0ms (0.1%)

regimes68.0ms (0.4%)

regimes94.0ms (0.6%)

regimes53.0ms (0.3%)

regimes46.0ms (0.3%)

regimes24.0ms (0.1%)

regimes6.0ms (0%)

regimes8.0ms (0%)

regimes6.0ms (0%)

regimes14.0ms (0.1%)

regimes4.0ms (0%)

regimes12.0ms (0.1%)

regimes7.0ms (0%)

bsearch32.0ms (0.2%)

bsearch27.0ms (0.2%)

bsearch3.0ms (0%)

bsearch30.0ms (0.2%)

bsearch19.0ms (0.1%)

bsearch67.0ms (0.4%)

bsearch81.0ms (0.5%)

bsearch90.0ms (0.5%)

bsearch81.0ms (0.5%)

bsearch69.0ms (0.4%)

bsearch99.0ms (0.6%)

bsearch69.0ms (0.4%)

bsearch60.0ms (0.4%)

simplify85.0ms (0.5%)

soundness2.7s (16.3%)

preprocess174.0ms (1%)

end0.0ms (0%)

Profiling