Metrics for Equirectangular approximation to distance on a great circle

analyze937.0ms (5%)

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: 417.0ms

ival-mult: 198.0ms (47.5% of total)

ival-add: 57.0ms (13.7% of total)

ival-sub: 48.0ms (11.5% of total)

ival-cos: 44.0ms (10.6% of total)

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

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

const: 5.0ms (1.2% of total)

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

sample3.1s (16.4%)

Results

1.5s	6137×	0	valid
967.0ms	2119×	1	valid

Precisions

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

ival-mult: 532.0ms (29.4% of total)

ival-div: 432.0ms (23.9% of total)

ival-sub: 245.0ms (13.5% of total)

ival-cos: 205.0ms (11.3% of total)

ival-add: 164.0ms (9.1% of total)

ival-sqrt: 136.0ms (7.5% of total)

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

const: 14.0ms (0.8% of total)

Bogosity

preprocess258.0ms (1.4%)

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	415	347
2	1082	343
3	5106	341
0	17	16
1	36	16
2	87	16
3	322	16
4	1528	16
5	5106	16
0	8103	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)

explain384.0ms (2%)

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Example	Subexpression
165	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))))`
75	118	(1.4570396855270892e-188 -6.495598477398037e+306 -1.0652829190006461e-77 -3.670429373366058e+26 -3.672513657986715e-190)	-	`(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

245.0ms	364×	1	valid
46.0ms	148×	0	valid

Compiler

Compiled 359 to 53 computations (85.2% saved)

Precisions

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

ival-mult: 52.0ms (34.9% of total)

ival-cos: 42.0ms (28.2% of total)

backward-pass: 19.0ms (12.8% of total)

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

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

ival-div: 7.0ms (4.7% of total)

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

const: 1.0ms (0.7% 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
▶	94.0%	(.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)

simplify216.0ms (1.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	36	66
2	87	66
3	322	66
4	1528	66
5	5106	66
0	8103	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)

localize149.0ms (0.8%)

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.8%	(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓	accuracy	74.6%	(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))

Results

113.0ms	183×	1	valid
17.0ms	73×	0	valid

Compiler

Compiled 72 to 15 computations (79.2% saved)

Precisions

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

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

compiled-spec: 16.0ms (19.4% of total)

ival-mult: 15.0ms (18.2% of total)

backward-pass: 8.0ms (9.7% of total)

ival-sub: 7.0ms (8.5% of total)

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

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

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

const: 1.0ms (1.2% of total)

series83.0ms (0.4%)

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
47.0ms	lambda1	@	0	(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
4.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)))))

rewrite368.0ms (2%)

Algorithm

1×	batch-egg-rewrite

Rules

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	17	49
1	90	49
2	777	49
0	8467	49

Stop Event

1×	iter limit
1×	node limit

Counts

5 → 103

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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))))) (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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (.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 phi1 phi2) (.f64 (-.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))))))
(/.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 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (.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 phi1 phi2) (.f64 (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.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 phi1 phi2) (.f64 (-.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))))))))
(/.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 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.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) (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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))))
(/.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))))))))
(/.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 phi1 phi2) (.f64 (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))))) #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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))))))))
(.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))))))))
(.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 phi1 phi2) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.f64 phi1 phi2) #s(literal 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 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (.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 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.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 (/.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)
(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 (neg.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 (neg.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 (neg.f64 (.f64 lambda1 lambda1)) (.f64 lambda2 lambda2))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 (.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 (neg.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)))

simplify457.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	5722
0	8498	5722

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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda1)) (.f64 R (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 lambda1 (.f64 #s(literal 1/2 binary64) (.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)))))))))) (.f64 R (.f64 lambda2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 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 (-.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)) (neg.f64 lambda1))
(* 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 R))) (.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 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 (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.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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 R))))))
(* 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 R (.f64 lambda2 (.f64 lambda2 lambda2))) (/.f64 (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) lambda1)) (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 R (.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))))
(+ (* 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 (-.f64 lambda1 lambda2) (-.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 (-.f64 lambda1 lambda2) (-.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 (-.f64 lambda1 lambda2) (-.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 (.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))))) phi1)) 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 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 R 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)))))))))
(+ (* 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 phi2 (.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 phi2 (+.f64 (+.f64 #s(literal 1 binary64) (.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)))))))))))
(+ (* 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 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 (.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/6 binary64)))) (/.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 (+.f64 #s(literal 1 binary64) (.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 (+.f64 #s(literal 1 binary64) (.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 (-.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) (+.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 (* R phi2))
(-.f64 #s(literal 0 binary64) (*.f64 R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 phi2 (-.f64 R (/.f64 (.f64 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)))))
(.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 lambda1 (.f64 lambda2 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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) (+.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 #s(literal 1/2 binary64) (.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)))))))))))
(* 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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda1 lambda1))) (/.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 (/ (* 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 (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) 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)))))) (/.f64 (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1))))
(* -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 #s(literal 0 binary64) (.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))))
(* -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 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 (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))))))) #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 (-.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))))
(* 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 (-.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)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (/.f64 lambda1 (.f64 lambda2 (.f64 lambda2 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (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))))))))
(* -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 (-.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)) (-.f64 #s(literal 0 binary64) 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 #s(literal -1/2 binary64) (/.f64 (.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 (-.f64 lambda1 lambda2) (-.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 (-.f64 lambda1 lambda2) (-.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 (-.f64 lambda1 lambda2) (-.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 (.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)))) 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)))))
(.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 (+.f64 #s(literal 1 binary64) (.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 (+.f64 #s(literal 1 binary64) (.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/6 binary64)))) (/.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 (+.f64 #s(literal 1 binary64) (.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 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -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 (-.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)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.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)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.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)) (-.f64 #s(literal 0 binary64) 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 phi1 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)))))))
(+ (* 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 lambda2 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(.f64 lambda2 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(.f64 lambda2 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(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)))

eval55.0ms (0.3%)

Compiler: Compiled 12072 to 1229 computations (89.8% saved)

prune89.0ms (0.5%)

Pruning

25 alts after pruning (25 fresh and 0 done)

	Pruned	Kept	Total
New	282	25	307
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	283	25	308

Accuracy

94.4%

Counts

308 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	19.5%	(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
	52.1%	(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
	32.3%	(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
	33.9%	(.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))
	11.3%	(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
	21.3%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
	14.1%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
	54.6%	(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
	20.1%	(.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)))
	42.9%	(.f64 R (hypot.f64 (/.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 phi1 phi2)))
	94.0%	(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
▶	94.0%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
	81.8%	(.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)))
	89.2%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
	88.4%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
	48.3%	(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
▶	18.4%	(.f64 R (.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)) (-.f64 #s(literal 0 binary64) lambda2)))
▶	11.3%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
	19.2%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
	21.3%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
▶	14.1%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
	54.9%	(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
	18.0%	(.f64 R (.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))))
	58.4%	(.f64 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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))))
▶	29.4%	(*.f64 R phi2)

Compiler

Compiled 1010 to 664 computations (34.3% saved)

simplify221.0ms (1.2%)

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) (+.f64 phi1 phi2)))
✓	cost-diff	0	(.f64 R (.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)) (-.f64 #s(literal 0 binary64) lambda2)))
✓	cost-diff	512	(.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)) (-.f64 #s(literal 0 binary64) lambda2))
✓	cost-diff	6528	(-.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))
✓	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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
✓	cost-diff	0	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
✓	cost-diff	0	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
✓	cost-diff	0	(*.f64 R phi2)
✓	cost-diff	0	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓	cost-diff	0	(hypot.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
✓	cost-diff	0	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
✓	cost-diff	256	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))

Rules

3128×	`-lowering-.f32`
3128×	`-lowering-.f64`
1662×	`fnmadd-define`
1432×	`times-frac`
770×	`+-lowering-+.f64`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	34	258
1	90	258
2	254	255
3	886	246
4	4208	233
0	8452	233

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

Outputs
(* R (sqrt (+ (* (* (/ 1 (/ 1 (- lambda1 lambda2))) (cos (/ (+ phi1 phi2) 2))) (* (/ 1 (/ 1 (- 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 (+ (* (* (/ 1 (/ 1 (- lambda1 lambda2))) (cos (/ (+ phi1 phi2) 2))) (* (/ 1 (/ 1 (- 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))
(* (/ 1 (/ 1 (- lambda1 lambda2))) (cos (/ (+ phi1 phi2) 2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(/ 1 (/ 1 (- lambda1 lambda2)))
(-.f64 lambda1 lambda2)
1
#s(literal 1 binary64)
(/ 1 (- lambda1 lambda2))
(/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(- 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)
(* R phi2)
(*.f64 R phi2)
R
phi2
(* R (* (cos (* 1/2 (+ phi1 phi2))) lambda1))
(.f64 (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 R lambda1))
R
(* (cos (* 1/2 (+ phi1 phi2))) lambda1)
(.f64 lambda1 (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64)))
(* 1/2 (+ phi1 phi2))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
lambda1
(* R (* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2)))
(-.f64 #s(literal 0 binary64) (.f64 R (.f64 lambda2 (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))))))
R
(* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2))
(.f64 (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64)))
(* 1/2 (+ phi1 phi2))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
(- 0 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
0
#s(literal 0 binary64)
lambda2
(* R (* (- (cos (* 1/2 (+ phi1 phi2))) (/ (* (cos (* 1/2 (+ phi1 phi2))) lambda1) lambda2)) (- 0 lambda2)))
(.f64 R (.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (-.f64 lambda1 lambda2)))
R
(* (- (cos (* 1/2 (+ phi1 phi2))) (/ (* (cos (* 1/2 (+ phi1 phi2))) lambda1) lambda2)) (- 0 lambda2))
(.f64 (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (-.f64 lambda1 lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* (cos (* 1/2 (+ phi1 phi2))) lambda1) lambda2))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64)))
(* 1/2 (+ phi1 phi2))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
(/ (* (cos (* 1/2 (+ phi1 phi2))) lambda1) lambda2)
(.f64 (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (/.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) lambda1)
(.f64 lambda1 (cos.f64 (.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))))
lambda1
lambda2
(- 0 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
0
#s(literal 0 binary64)

localize558.0ms (3%)

Localize:

Found 17 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.8%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
✓	accuracy	99.7%	(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)
✓	accuracy	86.0%	(.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)) (-.f64 #s(literal 0 binary64) lambda2))
✓	accuracy	74.6%	(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))) (-.f64 #s(literal 0 binary64) lambda2)))
✓	accuracy	99.7%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
✓	accuracy	74.6%	(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))) lambda1))
✓	accuracy	99.8%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
✓	accuracy	74.6%	(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓	accuracy	100.0%	(*.f64 R phi2)
✓	accuracy	99.9%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
✓	accuracy	99.8%	(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓	accuracy	99.7%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
✓	accuracy	74.6%	(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))

Results

407.0ms	183×	1	valid
84.0ms	72×	0	valid
3.0ms	1×	5	exit

Compiler

Compiled 287 to 32 computations (88.9% saved)

Precisions

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

ival-mult: 78.0ms (32.4% of total)

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

ival-sub: 39.0ms (16.2% of total)

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

backward-pass: 17.0ms (7.1% of total)

compiled-spec: 17.0ms (7.1% of total)

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

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

const: 1.0ms (0.4% of total)

series197.0ms (1.1%)

Counts

16 → 648

Calls

Call 1

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

Outputs
#<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 (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 (* 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 (* 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 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 (* lambda1 (cos (* 1/2 phi2)))>
#<alt (+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (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 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda2 (cos (* 1/2 phi2))))))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda2 (cos (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2))))) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* 1/8 (* lambda2 (cos (* 1/2 phi2)))))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* 1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1))))) (* 1/2 (* lambda2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* 1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* 1/8 (* lambda2 (cos (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (+ (cos (* 1/2 phi2)) (* -1 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2))))) (* -1/8 (cos (* 1/2 phi2)))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))>
#<alt (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))>
#<alt (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))>
#<alt (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))>
#<alt (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))>
#<alt (- (+ (cos (* 1/2 phi1)) (* -1 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))>
#<alt (- (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))>
#<alt (- (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) (* -1/8 (cos (* 1/2 phi1)))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))>
#<alt (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))>
#<alt (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))>
#<alt (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))>
#<alt (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))>
#<alt (* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))>
#<alt (* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))>
#<alt (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))>
#<alt (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))>
#<alt (/ (- (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)>
#<alt (/ (- (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)>
#<alt (/ (- (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* lambda2 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))))>
#<alt (+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* phi1 (+ (* -1 (* lambda2 (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))) (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))))>
#<alt (+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* phi1 (+ (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1 (* lambda2 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* lambda2 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2))))))))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))>
#<alt (+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* lambda2 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* phi2 (+ (* -1 (* lambda2 (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))) (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))))>
#<alt (+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* phi2 (+ (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1 (* lambda2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* lambda2 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))))))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))>
#<alt (* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))>
#<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 (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* R (* lambda2 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))))>
#<alt (+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* phi1 (+ (* -1 (* R (* lambda2 (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))))) (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))))))>
#<alt (+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* phi1 (+ (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))) (* phi1 (+ (* -1 (* R (* lambda2 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))) (* R (* lambda2 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)))))))))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 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))))) (* R (* lambda2 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))))>
#<alt (+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* phi2 (+ (* -1 (* R (* lambda2 (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))))) (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))))))>
#<alt (+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* phi2 (+ (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))) (* phi2 (+ (* -1 (* R (* lambda2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))) (* R (* lambda2 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))))))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<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)) (* R (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))>
#<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 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (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 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (+ (* -1/2 (/ (* lambda1 (* phi1 (sin (* 1/2 phi2)))) lambda2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (+ (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* -1/8 (/ (* lambda1 (* phi1 (cos (* 1/2 phi2)))) lambda2)))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (+ (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* phi1 (+ (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/48 (/ (* lambda1 (* phi1 (sin (* 1/2 phi2)))) lambda2)))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)>
#<alt (+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))>
#<alt (+ (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1/8 (/ (* lambda1 (* phi2 (cos (* 1/2 phi1)))) lambda2)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))>
#<alt (+ (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* phi2 (+ (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/48 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)>

Calls

162 calls:

Time	Variable		Point	Expression
122.0ms	phi2	@	-inf	(* R phi2)
9.0ms	lambda1	@	inf	(* (- (cos (* 1/2 (+ phi1 phi2))) (/ (* (cos (* 1/2 (+ phi1 phi2))) lambda1) lambda2)) (- 0 lambda2))
6.0ms	phi2	@	inf	(* R (* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2)))
5.0ms	phi2	@	-inf	(* R (* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2)))
1.0ms	R	@	0	(* R (* (- (cos (* 1/2 (+ phi1 phi2))) (/ (* (cos (* 1/2 (+ phi1 phi2))) lambda1) lambda2)) (- 0 lambda2)))

rewrite444.0ms (2.4%)

Algorithm

1×	batch-egg-rewrite

Rules

3844×	`-lowering-.f32`
3844×	`-lowering-.f64`
3468×	`/-lowering-/.f32`
3468×	`/-lowering-/.f64`
1930×	`+-lowering-+.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	34	170
1	191	170
2	1600	167
0	8879	167

Stop Event

1×	iter limit
1×	node limit

Counts

16 → 357

Calls

Call 1

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

Outputs
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(+.f64 (.f64 #s(literal 1 binary64) lambda1) (.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 lambda1 #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal 1 binary64)))
(+.f64 (+.f64 lambda1 #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) lambda2))
(exp.f64 (log.f64 (-.f64 lambda1 lambda2)))
(exp.f64 (*.f64 (log.f64 (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 lambda1 #s(literal 1 binary64)) (/.f64 lambda2 #s(literal 1 binary64)))
(-.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) lambda1 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 lambda1 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal 1 binary64)))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(fma.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2)) lambda1)
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) lambda2) lambda1)
(neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 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 (.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 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 lambda1 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 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(/.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 (.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 lambda1 lambda2))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (*.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 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 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (neg.f64 (.f64 #s(literal 1 binary64) (+.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 #s(literal 1 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2))) (neg.f64 (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 (-.f64 (.f64 lambda1 #s(literal 1 binary64)) (.f64 #s(literal 1 binary64) lambda2)) #s(literal 1 binary64))
(/.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))))
(/.f64 (neg.f64 (.f64 #s(literal 1 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 #s(literal 1 binary64) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) #s(literal -1/2 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))
(pow.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)))
(*.f64 #s(literal -1 binary64) (pow.f64 (-.f64 #s(literal 0 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 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(.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 (pow.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))) (.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2)))))) (+.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 phi1 phi2) (.f64 (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 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) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))))))))
(/.f64 (hypot.f64 (.f64 (-.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 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) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2)) (*.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 phi1 phi2) (.f64 (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (sqrt.f64 (neg.f64 (+.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 phi1 phi2) (.f64 (-.f64 phi1 phi2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))) (sqrt.f64 (neg.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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 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 (.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))) (*.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) (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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))))))
(/.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)))) (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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2)))))))))
(/.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 phi1 phi2) (.f64 (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))) (*.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64))) (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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))))))) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64))) (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 lambda1 lambda2) (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2)))))))))
(.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 phi1 phi2) (.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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.f64 phi1 phi2) #s(literal 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 (.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(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 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(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 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.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 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal -1 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 (.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 #s(literal -1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.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 (.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 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal -1 binary64))) (/.f64 #s(literal 1 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))))) (neg.f64 (+.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)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (neg.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 #s(literal -1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (/.f64 #s(literal 1 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))))) (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 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))) (/.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2)))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(.f64 #s(literal 1 binary64) (.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 lambda1 lambda2) (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 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))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2))
(*.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)))
(*.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2))
(*.f64 (pow.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64)) (-.f64 lambda1 lambda2))
(*.f64 (pow.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(*.f64 R phi2)
(*.f64 phi2 R)
(.f64 lambda1 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(.f64 R (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 lambda1 R))
(.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) R)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1)
(+.f64 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))
(-.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))))
(-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(+.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal 1/2 binary64)))
(+.f64 (.f64 phi2 #s(literal 1/2 binary64)) (.f64 phi1 #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))
(fma.f64 phi2 #s(literal 1/2 binary64) (*.f64 phi1 #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 phi2 #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) phi2 (*.f64 phi1 #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))))
(/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) #s(literal -2 binary64))
(/.f64 (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) (neg.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))))
(/.f64 (neg.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2))))
(/.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 phi1 #s(literal 1/2 binary64)) (.f64 phi1 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal 1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal 1/2 binary64)))) (-.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal 1/2 binary64))))
(/.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 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)))) #s(literal -2 binary64))
(/.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 phi1 #s(literal 1/2 binary64)) (.f64 phi1 #s(literal 1/2 binary64))) (-.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal 1/2 binary64))) (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal 1/2 binary64))))) (neg.f64 (-.f64 (.f64 phi1 #s(literal 1/2 binary64)) (.f64 phi2 #s(literal 1/2 binary64)))))
(/.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)))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2)) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi1 phi2)) #s(literal -1/2 binary64))
(.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))
(+.f64 (.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 0 binary64)) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) R)))
(+.f64 (.f64 #s(literal 0 binary64) (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) R)))
(fma.f64 #s(literal 0 binary64) (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)))
(fma.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 0 binary64) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R)))
(neg.f64 (.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda2))
(/.f64 (.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2))
(/.f64 (.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2))) lambda2)
(/.f64 (neg.f64 (.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 R (.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 (-.f64 #s(literal 0 binary64) lambda2) R))
(.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) R)
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(+.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 0 binary64)) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(neg.f64 (*.f64 lambda2 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda2))
(/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))) (.f64 lambda2 lambda2))
(/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))) lambda2)
(/.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (.f64 lambda2 lambda2))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda2)
(/.f64 (neg.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) lambda2))
(/.f64 (neg.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (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 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(+.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2))))
(+.f64 (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) (fma.f64 (neg.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 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda2)) (.f64 lambda1 (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 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) (fma.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (/.f64 #s(literal 1 binary64) lambda2) (*.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 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) (fma.f64 (neg.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 lambda1 lambda2) (.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))) (neg.f64 (/.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(+.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 1 binary64)))) (fma.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2))) #s(literal 1 binary64) (.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 1 binary64))))
(+.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2)) lambda1))) (fma.f64 (neg.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2))) lambda1 (.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2)) lambda1)))
(+.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda2) lambda1))) (fma.f64 (neg.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda2)) lambda1 (.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda2) lambda1)))
(+.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1))))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)))))
(+.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (.f64 (.f64 lambda2 lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))) (.f64 (.f64 lambda2 lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))))))
(+.f64 (fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (.f64 lambda2 (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)))))) (fma.f64 (-.f64 #s(literal 0 binary64) lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))) (.f64 lambda2 (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 1 binary64)))) (fma.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2))) #s(literal 1 binary64) (.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 1 binary64))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64) (neg.f64 (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2)) lambda1))) (fma.f64 (neg.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2))) lambda1 (.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2)) lambda1)))
(+.f64 (fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64) (neg.f64 (.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda2) lambda1))) (fma.f64 (neg.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda2)) lambda1 (.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda2) lambda1)))
(+.f64 (fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64) (neg.f64 (.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1))))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64) (neg.f64 (.f64 (.f64 lambda2 lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))) (.f64 (.f64 lambda2 lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))))))
(+.f64 (fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64) (neg.f64 (.f64 lambda2 (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)))))) (fma.f64 (-.f64 #s(literal 0 binary64) lambda2) (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))) (.f64 lambda2 (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))))))
(-.f64 (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 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (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 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))) (+.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)))))
(fma.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(fma.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 (/.f64 #s(literal 1 binary64) lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(fma.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (/.f64 #s(literal 1 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(fma.f64 (neg.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))))
(/.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (+.f64 (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 (neg.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (neg.f64 (+.f64 (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 (.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (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 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (.f64 (+.f64 (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 (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 (neg.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))))))
(/.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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))))) (neg.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))))))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (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 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) #s(literal -1 binary64))
(.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 (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 #s(literal 0 binary64) lambda2)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2)))))
(+.f64 (.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))) (neg.f64 (/.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) #s(literal 0 binary64)) (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 #s(literal 0 binary64) (-.f64 (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 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2)))))
(fma.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))) (neg.f64 (/.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 #s(literal 0 binary64) (-.f64 (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 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) #s(literal 0 binary64) (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2)))
(fma.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2)))))
(fma.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2))) (-.f64 #s(literal 0 binary64) lambda2)))
(neg.f64 (.f64 lambda2 (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)))))
(neg.f64 (.f64 (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) lambda2))
(/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))) (.f64 (-.f64 #s(literal 0 binary64) 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))) (*.f64 lambda2 lambda2)))
(/.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))) lambda2))
(/.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))) (.f64 (+.f64 (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 lambda2 lambda2)))
(/.f64 (.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2))) (.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) lambda2))
(/.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (.f64 (.f64 lambda2 lambda2) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2))))))
(/.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) 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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (.f64 (.f64 lambda2 lambda2) (+.f64 (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 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64)))) (.f64 lambda2 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (.f64 lambda2 (+.f64 (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 (-.f64 (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 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2))
(/.f64 (.f64 (-.f64 (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 #s(literal 0 binary64) (*.f64 lambda2 lambda2))) lambda2)
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (+.f64 (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 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (-.f64 #s(literal 0 binary64) lambda2)) (+.f64 (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 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)) (-.f64 (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 lambda2 lambda2))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)))) lambda2)
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))) (.f64 (-.f64 #s(literal 0 binary64) 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))) (*.f64 lambda2 lambda2))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))) 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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)))) (neg.f64 (.f64 (+.f64 (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 lambda2 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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)))) (neg.f64 (.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))) lambda2)))
(/.f64 (neg.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (neg.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) 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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))))) (neg.f64 (.f64 (.f64 lambda2 lambda2) (+.f64 (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 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))))) (neg.f64 (.f64 lambda2 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))))) (neg.f64 (.f64 lambda2 (+.f64 (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 (neg.f64 (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (.f64 (-.f64 (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 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) lambda2))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))))) (neg.f64 (+.f64 (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 (neg.f64 (.f64 (-.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (+.f64 (.f64 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (/.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 (+.f64 phi1 phi2) #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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (-.f64 #s(literal 0 binary64) lambda2))) (neg.f64 (+.f64 (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 (neg.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)) (-.f64 (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 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)) (-.f64 (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 #s(literal 0 binary64) lambda2))
(.f64 (-.f64 (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 #s(literal 0 binary64) lambda2))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (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 (.f64 R (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)))) #s(literal 0 binary64)) (.f64 R (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2))))
(+.f64 (.f64 #s(literal 0 binary64) (.f64 R (-.f64 (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 R (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2))))
(fma.f64 #s(literal 0 binary64) (.f64 R (-.f64 (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 R (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2))))
(fma.f64 (.f64 R (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)))) #s(literal 0 binary64) (.f64 R (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2))))
(neg.f64 (.f64 (.f64 R (-.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)))) lambda2))
(/.f64 (.f64 (.f64 R (-.f64 (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 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))) (.f64 lambda2 lambda2))
(/.f64 (.f64 (.f64 R (-.f64 (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 #s(literal 0 binary64) (.f64 lambda2 lambda2))) lambda2)
(/.f64 (neg.f64 (.f64 (.f64 R (-.f64 (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 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) (.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (.f64 (.f64 R (-.f64 (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 #s(literal 0 binary64) (.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) lambda2))
(.f64 R (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2)))
(.f64 (-.f64 (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 #s(literal 0 binary64) lambda2) R))
(.f64 (.f64 (-.f64 (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 #s(literal 0 binary64) lambda2)) R)
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 R (-.f64 (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 R (-.f64 (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 #s(literal 0 binary64) lambda2))
(.f64 (.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (-.f64 (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 (fma.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))
(-.f64 (.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))))
(-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(*.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal -1 binary64)))
(neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 (/.f64 lambda1 lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))))
(/.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda2)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))))
(/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) lambda2))
(/.f64 (.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) lambda2)
(/.f64 (neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1))) (neg.f64 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 (neg.f64 (.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) lambda2))
(pow.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 #s(literal 1 binary64) (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2)))
(.f64 lambda1 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) lambda2)))
(*.f64 lambda1 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda2))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 lambda1 lambda2))
(.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) lambda2))
(.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 (/.f64 #s(literal 1 binary64) lambda2) (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) lambda2) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 lambda1 (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 (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (.f64 lambda2 lambda2))) (*.f64 lambda2 lambda2))
(.f64 (/.f64 (.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2))) lambda2)

simplify562.0ms (3%)

Algorithm

1×	egg-herbie

Rules

7632×	`-lowering-.f32`
7632×	`-lowering-.f64`
4472×	`+-lowering-+.f64`
4472×	`+-lowering-+.f32`
1526×	`distribute-lft-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1112	13677
1	3992	12513
0	8519	12513

Stop Event

1×	iter limit
1×	node limit

Counts

648 → 648

Calls

Call 1

Inputs
(* -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 (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))
(* 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 (* 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 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)))))
(* lambda1 (cos (* 1/2 phi2)))
(+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda1 (cos (* 1/2 phi1)))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (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 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda2 (cos (* 1/2 phi2))))))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda2 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2))))) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* 1/8 (* lambda2 (cos (* 1/2 phi2)))))))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* 1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1))))) (* 1/2 (* lambda2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* phi2 (+ (* 1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* 1/8 (* lambda2 (cos (* 1/2 phi1)))))))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (+ (cos (* 1/2 phi2)) (* -1 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2))))) (* -1/8 (cos (* 1/2 phi2)))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))
(- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))
(- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))
(- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))
(- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(- (+ (cos (* 1/2 phi1)) (* -1 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(- (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(- (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) (* -1/8 (cos (* 1/2 phi1)))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))
(- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))
(- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))
(- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))
(cos (* 1/2 (+ phi1 phi2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))
(* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))
(* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))
(* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))
(* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(/ (- (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)
(/ (- (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)
(/ (- (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)
(cos (* 1/2 (+ phi1 phi2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(cos (* 1/2 (+ phi1 phi2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* lambda2 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* phi1 (+ (* -1 (* lambda2 (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))) (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* phi1 (+ (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1 (* lambda2 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* lambda2 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2))))))))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* lambda2 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* phi2 (+ (* -1 (* lambda2 (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))) (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* phi2 (+ (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1 (* lambda2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* lambda2 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))))))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))
(* -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)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* R (* lambda2 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))))
(+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* phi1 (+ (* -1 (* R (* lambda2 (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))))) (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))))))
(+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* phi1 (+ (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))) (* phi1 (+ (* -1 (* R (* lambda2 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))) (* R (* lambda2 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)))))))))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 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 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))))
(+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* phi2 (+ (* -1 (* R (* lambda2 (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))))) (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))))))
(+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* phi2 (+ (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))) (* phi2 (+ (* -1 (* R (* lambda2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))) (* R (* lambda2 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))))))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* 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)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))
(* -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 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (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))))
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(+ (* -1/2 (/ (* lambda1 (* phi1 (sin (* 1/2 phi2)))) lambda2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(+ (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* -1/8 (/ (* lambda1 (* phi1 (cos (* 1/2 phi2)))) lambda2)))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(+ (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* phi1 (+ (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/48 (/ (* lambda1 (* phi1 (sin (* 1/2 phi2)))) lambda2)))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi1))) lambda2)
(+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(+ (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1/8 (/ (* lambda1 (* phi2 (cos (* 1/2 phi1)))) lambda2)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(+ (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* phi2 (+ (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/48 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)

Outputs
(* -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)))
(* 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 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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) (+.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 (.f64 #s(literal 1/2 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 (.f64 R 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 (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 (.f64 R lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (* 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 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 lambda1 (.f64 (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.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 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) (+.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)))))))))) (.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 (.f64 R lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal 1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda1 lambda1))))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda1 lambda1))))) (.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (.f64 lambda1 lambda1))))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -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 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (-.f64 #s(literal 0 binary64) 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 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* 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 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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) (+.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 (.f64 #s(literal 1/2 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) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.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 (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 (.f64 R lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (* 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 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (.f64 R lambda1) (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.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.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 R (-.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 (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 (.f64 R lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal 1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda2 lambda2))))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda2 lambda2))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda2 (.f64 lambda2 lambda2))))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.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 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) 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 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) 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 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 R phi1) (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (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)))))))
(+ (* 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 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 phi1 (.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 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (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 (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 R (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))))
(+ (* 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 #s(literal 1/2 binary64) (.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 R (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))) (.f64 phi1 (.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 R phi1) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (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 (.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 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (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)))))))))))))
(* 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 #s(literal 1/2 binary64) 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)))) (.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 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) (+.f64 phi1 phi2))) #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) (+.f64 phi1 phi2))) #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 (- 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 (.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))))) phi1)) 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 (.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)))) (/.f64 (.f64 (.f64 R 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 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 R phi2) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 (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 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 (.f64 (-.f64 lambda1 lambda2) (-.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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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/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 #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 R (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 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 (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 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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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)
(*.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 (-.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) (+.f64 phi1 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 (+ 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 (-.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) (+.f64 phi1 phi2))) #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) (+.f64 phi1 phi2))) #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 (* -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 (.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)))) (/.f64 (.f64 (.f64 R 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 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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) (+.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 (.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) (+.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)))))))) (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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) (+.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 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) (+.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)))))) (.f64 lambda1 (.f64 (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.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 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 lambda2 (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)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(.f64 lambda1 (+.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 lambda1 lambda1))) (/.f64 (.f64 lambda2 (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)) (+ (* 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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) (+.f64 phi1 phi2))) (.f64 lambda1 (.f64 lambda1 lambda1)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (-.f64 #s(literal 0 binary64) 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) (-.f64 #s(literal 0 binary64) 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) 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 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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) (+.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 (.f64 #s(literal 1/2 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 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 (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 lambda1 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (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 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) (+.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)))))) (.f64 lambda1 (.f64 (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.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.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 lambda1 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 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))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (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)) (* 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 lambda1 (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)) (+ (* 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 lambda1 lambda2) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (.f64 lambda2 lambda2))))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 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)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 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)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda1 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) 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 #s(literal 1/2 binary64) (.f64 (.f64 phi1 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (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)))))))
(+ (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 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi1 (.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 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (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 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (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)))))))))
(+ (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 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (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 phi1 (.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 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 (.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (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))))) (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))))))))))))
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 #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 phi1 phi1))))))
(* 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 phi1) (.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 phi1 phi1)))) (.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 phi1 phi1)))))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) 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 (.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)))) 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)))))
(.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 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 (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 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 (.f64 (-.f64 lambda1 lambda2) (-.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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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/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 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 #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 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 phi2 (.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi1 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 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) (+.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 #s(literal 1 binary64) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 phi1 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 (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 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 (- 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 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 lambda2 (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 lambda2 (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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal -1/2 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal -1/8 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (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 (.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))) (* -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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 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 phi2)
(*.f64 R 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 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 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.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))))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 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))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (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 #s(literal -1/8 binary64) phi1) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (.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 #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 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 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(-.f64 #s(literal 0 binary64) (.f64 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 #s(literal 0 binary64) (.f64 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 #s(literal 0 binary64) (.f64 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 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 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))))
(-.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda2 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))))))
(-.f64 (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/8 binary64) R) (.f64 (.f64 lambda2 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda2 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda2 (cos (* 1/2 phi2))))))))))
(-.f64 (.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 (.f64 #s(literal -1/48 binary64) R) (.f64 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))) (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (.f64 (.f64 lambda2 phi2) (sin.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))))) (* phi2 (+ (* 1/8 (* R (* lambda2 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))))))
(-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/8 binary64) R) (.f64 (.f64 lambda2 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (sin.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))))) (* phi2 (+ (* 1/2 (* R (* lambda2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda2 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda2 (cos (* 1/2 phi1))))))))))
(-.f64 (.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 #s(literal -1/48 binary64) R) (.f64 (.f64 lambda2 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 R lambda2) (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 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* 1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/8 (* lambda2 (* phi1 (cos (* 1/2 phi2))))) (* 1/2 (* lambda2 (sin (* 1/2 phi2)))))))
(-.f64 (.f64 phi1 (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/2 (* lambda2 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/48 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* 1/8 (* lambda2 (cos (* 1/2 phi2)))))))))
(-.f64 (.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 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1/48 binary64)) (.f64 (.f64 #s(literal 1/8 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))))
(-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 lambda2 phi2) (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)))) (* phi2 (+ (* 1/8 (* lambda2 (* phi2 (cos (* 1/2 phi1))))) (* 1/2 (* lambda2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 phi2 (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (.f64 lambda2 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) 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)))) (* phi2 (+ (* 1/2 (* lambda2 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/48 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* 1/8 (* lambda2 (cos (* 1/2 phi1)))))))))
(-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/48 binary64) (.f64 (.f64 lambda2 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal 1/8 binary64) lambda2) (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 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2))
(- (+ (cos (* 1/2 phi2)) (* -1 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(-.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2))
(- (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (.f64 phi1 (-.f64 (.f64 phi1 (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(- (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2))))) (* -1/8 (cos (* 1/2 phi2)))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (.f64 phi1 (-.f64 (.f64 phi1 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda2))) (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))))) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (+ (cos (* 1/2 phi1)) (* -1 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(-.f64 (-.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 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))
(- (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 phi2 (-.f64 (.f64 phi2 (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(- (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))) (* -1/8 (cos (* 1/2 phi1)))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (.f64 phi2 (-.f64 (.f64 phi2 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))))) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda1)) lambda2)
(* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))
(.f64 lambda1 (-.f64 (/.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))) lambda2)))
(* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))
(.f64 lambda1 (-.f64 (/.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))) lambda2)))
(* lambda1 (- (/ (cos (* 1/2 (+ phi1 phi2))) lambda1) (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))
(.f64 lambda1 (-.f64 (/.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))) lambda2)))
(* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda1)) lambda2)
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))
(.f64 (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda1)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))
(.f64 (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda1)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda1)) (* -1 (/ (cos (* 1/2 (+ phi1 phi2))) lambda2)))))
(.f64 (+.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda1)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))
(/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda1)) lambda2)
(/ (- (* 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 lambda2 lambda1)) lambda2)
(/ (- (* 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 lambda2 lambda1)) lambda2)
(/ (- (* 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 lambda2 lambda1)) lambda2)
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2))
(* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* lambda2 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))))
(-.f64 (.f64 (.f64 lambda2 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))) (.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* phi1 (+ (* -1 (* lambda2 (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))) (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))))
(-.f64 (.f64 phi1 (-.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))) (.f64 (.f64 lambda2 phi1) (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))))) (.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))) (* phi1 (+ (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1 (* lambda2 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* lambda2 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2))))))))))
(-.f64 (.f64 phi1 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))) (.f64 phi1 (-.f64 (.f64 (.f64 lambda2 phi1) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda2))) (.f64 lambda2 (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))))))) (.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* lambda2 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))))
(-.f64 (.f64 (.f64 lambda2 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* phi2 (+ (* -1 (* lambda2 (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))) (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))))
(-.f64 (.f64 phi2 (-.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (.f64 (.f64 lambda2 phi2) (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))))) (.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))))
(+ (* -1 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))) (* phi2 (+ (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1 (* lambda2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* lambda2 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2))))))))))
(-.f64 (.f64 phi2 (+.f64 (.f64 lambda2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (.f64 phi2 (-.f64 (.f64 (.f64 lambda2 phi2) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) (.f64 lambda2 (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))))))) (.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 lambda2 (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 lambda2 (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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* R (* lambda2 (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2))))))))
(-.f64 (.f64 R (.f64 (.f64 lambda2 phi1) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))) (.f64 (.f64 R lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2))))
(+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* phi1 (+ (* -1 (* R (* lambda2 (* phi1 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))))) (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))))))
(-.f64 (.f64 phi1 (-.f64 (.f64 (.f64 R lambda2) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))) (.f64 R (.f64 (.f64 lambda2 phi1) (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))))))) (.f64 (.f64 R lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))))
(+ (* -1 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))) (* phi1 (+ (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* 1/2 (sin (* 1/2 phi2)))))) (* phi1 (+ (* -1 (* R (* lambda2 (- (* -1/8 (cos (* 1/2 phi2))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))) (* R (* lambda2 (* phi1 (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)))))))))))
(-.f64 (.f64 phi1 (+.f64 (.f64 (.f64 R lambda2) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))) (.f64 phi1 (-.f64 (.f64 R (.f64 (.f64 lambda2 phi1) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda2)))) (.f64 (.f64 R lambda2) (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)))))))) (.f64 (.f64 R lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2))))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi2 (* -1 phi1)))) (/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.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 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* R (* lambda2 (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1))))))))
(-.f64 (.f64 R (.f64 (.f64 lambda2 phi2) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))) (.f64 (.f64 R lambda2) (-.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 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* phi2 (+ (* -1 (* R (* lambda2 (* phi2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))))) (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))))))
(-.f64 (.f64 phi2 (-.f64 (.f64 (.f64 R lambda2) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (.f64 R (.f64 (.f64 lambda2 phi2) (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))))))) (.f64 (.f64 R lambda2) (-.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 (* lambda2 (- (cos (* 1/2 phi1)) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))) (* phi2 (+ (* R (* lambda2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* 1/2 (sin (* 1/2 phi1)))))) (* phi2 (+ (* -1 (* R (* lambda2 (- (* -1/8 (cos (* 1/2 phi1))) (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))) (* R (* lambda2 (* phi2 (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/48 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)))))))))))
(-.f64 (.f64 phi2 (+.f64 (.f64 (.f64 R lambda2) (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2))) (.f64 phi2 (-.f64 (.f64 R (.f64 (.f64 lambda2 phi2) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 lambda1 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2)))) (.f64 (.f64 R lambda2) (.f64 #s(literal -1/8 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)))))))) (.f64 (.f64 R lambda2) (-.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 (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (- (cos (* 1/2 (- phi1 (* -1 phi2)))) (/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (.f64 (.f64 R lambda1) (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)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (.f64 (.f64 R lambda1) (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)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (.f64 (.f64 R lambda1) (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)))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) lambda1))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (.f64 (.f64 R lambda1) (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)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (.f64 (.f64 R lambda1) (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)))))
(+ (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (.f64 (.f64 R lambda1) (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)))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (.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 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 (.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 #s(literal -1/8 binary64) phi1) (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 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (.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 #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 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)))
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(+ (* -1/2 (/ (* lambda1 (* phi1 (sin (* 1/2 phi2)))) lambda2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(+.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda2))
(+ (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* -1/8 (/ (* lambda1 (* phi1 (cos (* 1/2 phi2)))) lambda2)))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(+.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2) (.f64 phi1 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda2))))
(+ (* phi1 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi2))) lambda2)) (* phi1 (+ (* -1/8 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/48 (/ (* lambda1 (* phi1 (sin (* 1/2 phi2)))) lambda2)))))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(+.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2) (.f64 phi1 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2) (.f64 phi1 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda2) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda2))))))
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi1))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2)
(+ (* -1/2 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)) (/ (* lambda1 (cos (* 1/2 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 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
(+ (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* -1/8 (/ (* lambda1 (* phi2 (cos (* 1/2 phi1)))) lambda2)))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(+.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (.f64 phi2 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))))
(+ (* phi2 (+ (* -1/2 (/ (* lambda1 (sin (* 1/2 phi1))) lambda2)) (* phi2 (+ (* -1/8 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/48 (/ (* lambda1 (* phi2 (sin (* 1/2 phi1)))) lambda2)))))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))
(+.f64 (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (.f64 phi2 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (.f64 phi2 (+.f64 (/.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) lambda2) (/.f64 (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda2))))))
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)
(/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)

eval285.0ms (1.5%)

Compiler: Compiled 37197 to 3174 computations (91.5% saved)

prune246.0ms (1.3%)

Pruning

35 alts after pruning (34 fresh and 1 done)

	Pruned	Kept	Total
New	1315	22	1337
Fresh	8	12	20
Picked	4	1	5
Done	0	0	0
Total	1327	35	1362

Accuracy

99.9%

Counts

1362 → 35

Alt Table

Click to see full alt table

Status	Accuracy	Program
	19.2%	(-.f64 (.f64 (.f64 R lambda1) (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)))))
	52.1%	(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
▶	32.3%	(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
	33.9%	(.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))
	14.1%	(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
	21.3%	(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
	8.4%	(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	13.9%	(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
	11.3%	(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
	54.6%	(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
	42.9%	(.f64 R (hypot.f64 (/.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 phi1 phi2)))
▶	94.0%	(*.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 phi1 phi2)))
	99.8%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))) (-.f64 phi1 phi2)))
▶	99.8%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 phi1 phi2)))
	89.2%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
	89.2%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
	88.4%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
	48.3%	(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
	18.4%	(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
	15.4%	(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)))
	16.2%	(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) lambda1))
	20.0%	(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
	8.8%	(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
	9.1%	(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
	10.3%	(.f64 R (.f64 (+.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)))) (-.f64 #s(literal 0 binary64) lambda2)))
	10.4%	(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
▶	12.4%	(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
	19.2%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
▶	21.3%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
	8.4%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
	11.2%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
	3.4%	(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
	3.3%	(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1))
	54.9%	(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
✓	29.4%	(*.f64 R phi2)

Compiler

Compiled 1398 to 952 computations (31.9% saved)

simplify242.0ms (1.3%)

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

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

Rules

3240×	`-lowering-.f32`
3240×	`-lowering-.f64`
1848×	`+-lowering-+.f64`
1848×	`+-lowering-+.f32`
1354×	`--lowering--.f32`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	50	348
1	131	343
2	335	343
3	1287	339
4	6448	339
0	8271	339

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* R (sqrt (+ (* (* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))) (* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))) (* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))))) (* (- phi1 phi2) (- phi1 phi2))))
(* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))))
(/ 1 (/ 1 (- lambda1 lambda2)))
1
(/ 1 (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
(- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))
(* (cos (* phi2 1/2)) (cos (* phi1 1/2)))
(cos (* phi2 1/2))
(* phi2 1/2)
phi2
1/2
(cos (* phi1 1/2))
(* phi1 1/2)
phi1
(* (sin (* phi2 1/2)) (sin (* phi1 1/2)))
(sin (* phi2 1/2))
(sin (* phi1 1/2))
(- phi1 phi2)
(- 0 (* R phi1))
0
(* R phi1)
R
phi1
(* 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
(* R (* (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))) lambda1))
R
(* (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))) lambda1)
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
phi1
(+ 1/2 (* 1/2 (/ phi2 phi1)))
1/2
(* 1/2 (/ phi2 phi1))
(/ phi2 phi1)
phi2
lambda1
(* R (sqrt (+ (* (/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2)))) (/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2))))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2)))) (/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2))))) (* (- phi1 phi2) (- phi1 phi2))))
(/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2))))
1
(/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2)))
(/ 1 (- lambda1 lambda2))
(- lambda1 lambda2)
lambda1
lambda2
(cos (/ (+ phi1 phi2) 2))
(/ (+ phi1 phi2) 2)
(+ phi1 phi2)
phi1
phi2
2
(- phi1 phi2)

Outputs
(* R (sqrt (+ (* (* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))) (* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))))) (* (- phi1 phi2) (- phi1 phi2)))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))) (* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))
(* (/ 1 (/ 1 (- lambda1 lambda2))) (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))))
(.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/ 1 (/ 1 (- lambda1 lambda2)))
(-.f64 lambda1 lambda2)
1
#s(literal 1 binary64)
(/ 1 (- lambda1 lambda2))
(/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))
(-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(* (cos (* phi2 1/2)) (cos (* phi1 1/2)))
(.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(cos (* phi2 1/2))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(* phi2 1/2)
(*.f64 phi2 #s(literal 1/2 binary64))
phi2
1/2
#s(literal 1/2 binary64)
(cos (* phi1 1/2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* phi1 1/2)
(*.f64 #s(literal 1/2 binary64) phi1)
phi1
(* (sin (* phi2 1/2)) (sin (* phi1 1/2)))
(.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(sin (* phi2 1/2))
(sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(sin (* phi1 1/2))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(- phi1 phi2)
(-.f64 phi1 phi2)
(- 0 (* R phi1))
(*.f64 R (-.f64 #s(literal 0 binary64) phi1))
0
#s(literal 0 binary64)
(* R phi1)
(*.f64 R phi1)
R
phi1
(* R (* (cos (* 1/2 (+ phi1 phi2))) lambda2))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 R lambda2))
R
(* (cos (* 1/2 (+ phi1 phi2))) lambda2)
(.f64 lambda2 (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)))
(* 1/2 (+ phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi2 phi1)
phi1
phi2
lambda2
(* R (* (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))) lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 (.f64 phi2 #s(literal 1 binary64))))) (.f64 R lambda1))
R
(* (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))) lambda1)
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 phi2 #s(literal 1 binary64))))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 (.f64 phi2 #s(literal 1 binary64)))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(.f64 #s(literal 1/2 binary64) (+.f64 phi1 (.f64 phi2 #s(literal 1 binary64))))
phi1
(+ 1/2 (* 1/2 (/ phi2 phi1)))
(*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
1/2
#s(literal 1/2 binary64)
(* 1/2 (/ phi2 phi1))
(/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1)
(/ phi2 phi1)
(/.f64 phi2 phi1)
phi2
lambda1
(* R (sqrt (+ (* (/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2)))) (/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2))))) (* (- phi1 phi2) (- phi1 phi2)))))
(.f64 R (hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))))
R
(sqrt (+ (* (/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2)))) (/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2))))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(/ 1 (/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
1
#s(literal 1 binary64)
(/ (/ 1 (- lambda1 lambda2)) (cos (/ (+ phi1 phi2) 2)))
(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(/ 1 (- lambda1 lambda2))
(/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos (/ (+ phi1 phi2) 2))
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(/ (+ phi1 phi2) 2)
(/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))
(+ phi1 phi2)
(+.f64 phi2 phi1)
phi1
phi2
2
#s(literal 2 binary64)
(- phi1 phi2)
(-.f64 phi1 phi2)

localize638.0ms (3.4%)

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.9%	(*.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 phi1 phi2)))
✓	accuracy	99.6%	(/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓	accuracy	99.5%	(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
✓	accuracy	74.6%	(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
✓	accuracy	99.8%	(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
✓	accuracy	99.8%	(.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1)
✓	accuracy	87.5%	(.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
✓	accuracy	74.6%	(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1)))))
✓	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.6%	(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓	accuracy	100.0%	(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
✓	accuracy	100.0%	(*.f64 R phi1)
✓	accuracy	99.8%	(-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))
✓	accuracy	99.8%	(.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))))
✓	accuracy	99.7%	(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
✓	accuracy	99.7%	(.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))

Results

441.0ms	189×	1	valid
71.0ms	66×	0	valid
4.0ms	1×	5	exit

Compiler

Compiled 390 to 46 computations (88.2% saved)

Precisions

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

ival-mult: 72.0ms (25.2% of total)

ival-cos: 67.0ms (23.5% of total)

compiled-spec: 35.0ms (12.3% of total)

backward-pass: 28.0ms (9.8% of total)

ival-sin: 23.0ms (8.1% of total)

ival-div: 21.0ms (7.4% of total)

ival-add: 16.0ms (5.6% of total)

ival-sqrt: 11.0ms (3.9% of total)

ival-sub: 10.0ms (3.5% of total)

const: 1.0ms (0.4% of total)

series174.0ms (0.9%)

Counts

21 → 768

Calls

Call 1

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

Outputs
#<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 (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))>
#<alt (* -1 (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))>
#<alt (* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi2))) phi2)) (* R 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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* -1 (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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/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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1))) phi1))) phi1)))))>
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))>
#<alt (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))>
#<alt (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<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 (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<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 (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<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 (* 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/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 (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<alt (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))>
#<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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))>
#<alt (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))>
#<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 (* 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 (/ lambda1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (- (* lambda1 (- (* -1 (/ lambda1 (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (- (* lambda1 (- (* lambda1 (- (* -1 (/ lambda1 (* (pow lambda2 4) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (/ (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)>
#<alt (/ (- (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ (pow lambda2 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))) lambda1)>
#<alt (/ (- (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ (pow lambda2 3) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* -1 (/ (pow lambda2 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))) lambda1)>
#<alt (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (/ (- (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (* -1 (/ (- (* -1 (/ (- (/ (pow lambda2 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* -1 (/ lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda2 3) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (/ (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* -1 (/ lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* lambda2 (+ (/ 1 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* lambda2 (+ (* lambda2 (+ (/ 1 (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 4) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (/ -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (/ (- (* -1 (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)>
#<alt (/ (- (* -1 (/ (pow lambda1 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))) lambda2)>
#<alt (/ (- (* -1 (/ (pow lambda1 3) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (+ (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (/ (pow lambda1 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))) lambda2)>
#<alt (/ -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (/ (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda2))>
#<alt (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (pow lambda1 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (/ lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))>
#<alt (* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (/ (pow lambda1 3) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* -1 (/ (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (/ lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))>
#<alt (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))>
#<alt (+ (* 1/2 (/ (* phi1 (sin (* 1/2 phi2))) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* phi1 (- (* phi1 (- (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/2 (/ (* (sin (* 1/2 phi2)) (- (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (cos (* 1/2 phi2)))) (+ (* -1/16 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))) (* 1/48 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))))) (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* 1/2 (/ (* phi2 (sin (* 1/2 phi1))) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (+ (* phi2 (- (* phi2 (- (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/2 (/ (* (sin (* 1/2 phi1)) (- (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (cos (* 1/2 phi1)))) (+ (* -1/16 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))) (* 1/48 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))))) (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))>
#<alt (/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))>
#<alt (* 1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))>
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))>
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* 1/2 (* phi1 (sin (* 1/2 phi2))))>
#<alt (* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))>
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))>
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<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)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))>

Calls

192 calls:

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

rewrite377.0ms (2%)

Algorithm

1×	batch-egg-rewrite

Rules

2550×	`-lowering-.f32`
2550×	`-lowering-.f64`
2132×	`fma-lowering-fma.f32`
2132×	`fma-lowering-fma.f64`
1818×	`pow-lowering-pow.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	50	268
1	284	192
2	2547	192
0	8268	192

Stop Event

1×	iter limit
1×	node limit

Counts

21 → 613

Calls

Call 1

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

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

simplify509.0ms (2.7%)

Algorithm

1×	egg-herbie

Rules

7436×	`-lowering-.f32`
7436×	`-lowering-.f64`
2602×	`+-lowering-+.f64`
2602×	`+-lowering-+.f32`
1690×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1567	21789
1	5583	20234
0	8118	20234

Stop Event

1×	iter limit
1×	node limit

Counts

768 → 768

Calls

Call 1

Inputs
(* -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 (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))
(* -1 (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))
(* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* 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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi2))) phi2)) (* R 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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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/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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1))) phi1))) phi1)))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* (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)))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (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)))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -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 (* 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/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)))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* 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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(* lambda1 (cos (* 1/2 phi2)))
(+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* 1/2 phi1)))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))
(cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))
(cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))
(cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))
(* -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))
(* 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 (/ lambda1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(- (* lambda1 (- (* -1 (/ lambda1 (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(- (* lambda1 (- (* lambda1 (- (* -1 (/ lambda1 (* (pow lambda2 4) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(/ (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)
(/ (- (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ (pow lambda2 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))) lambda1)
(/ (- (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ (pow lambda2 3) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* -1 (/ (pow lambda2 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))) lambda1)
(/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (/ (- (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(* -1 (/ (- (* -1 (/ (- (/ (pow lambda2 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* -1 (/ lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda2 3) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (/ (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* -1 (/ lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))
(+ (* lambda2 (+ (/ 1 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* lambda2 (+ (* lambda2 (+ (/ 1 (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 4) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(/ -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(/ (- (* -1 (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)
(/ (- (* -1 (/ (pow lambda1 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))) lambda2)
(/ (- (* -1 (/ (pow lambda1 3) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (+ (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (/ (pow lambda1 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))) lambda2)
(/ -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (/ (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda2))
(* -1 (/ (+ (* -1 (/ (- (* -1 (/ (pow lambda1 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (/ lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))
(* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (/ (pow lambda1 3) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* -1 (/ (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (/ lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))
(/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* 1/2 (/ (* phi1 (sin (* 1/2 phi2))) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* phi1 (- (* phi1 (- (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/2 (/ (* (sin (* 1/2 phi2)) (- (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (cos (* 1/2 phi2)))) (+ (* -1/16 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))) (* 1/48 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))))) (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* 1/2 (/ (* phi2 (sin (* 1/2 phi1))) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))
(+ (* phi2 (- (* phi2 (- (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/2 (/ (* (sin (* 1/2 phi1)) (- (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (cos (* 1/2 phi1)))) (+ (* -1/16 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))) (* 1/48 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))))) (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))
(/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))
(* 1/2 (* phi2 (sin (* 1/2 phi1))))
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* 1/2 (* phi1 (sin (* 1/2 phi2))))
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(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)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))

Outputs
(* -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 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)))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R (.f64 (.f64 lambda1 lambda2) (pow.f64 (-.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)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (-.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)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R lambda2) (pow.f64 (-.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)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 lambda2 (pow.f64 (-.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)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (-.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)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 R (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (-.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)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 (.f64 R lambda2) (pow.f64 (-.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)))) #s(literal 2 binary64)))))))
(* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (.f64 R lambda1) (-.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)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 lambda1 (-.f64 (.f64 R (-.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 (.f64 R lambda2) (-.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))))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 lambda1 (-.f64 (+.f64 (.f64 R (-.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 #s(literal 1/2 binary64) (.f64 lambda1 lambda1)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.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 (.f64 R lambda2) (-.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))))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))
(.f64 lambda1 (-.f64 (+.f64 (+.f64 (.f64 R (-.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 #s(literal 1/2 binary64) (.f64 lambda1 lambda1)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.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 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (.f64 lambda1 lambda1))) (-.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 (.f64 R lambda2) (-.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))))) lambda1)))
(* -1 (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (neg.f64 (.f64 R lambda1)) (-.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)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 R (-.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 (.f64 R lambda2) (-.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))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 R (-.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 (.f64 (.f64 R lambda2) (-.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 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda1 (-.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))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 R (-.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 (.f64 (.f64 R lambda2) (-.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 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (-.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 R (.f64 (-.f64 phi1 phi2) (-.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))))))) lambda1)) lambda1)) (neg.f64 lambda1))
(* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R (.f64 (.f64 lambda1 lambda2) (pow.f64 (-.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)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.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 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R lambda2) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.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)))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R lambda1) (pow.f64 (-.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)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (.f64 R (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 (.f64 lambda1 (.f64 (.f64 lambda2 (pow.f64 (-.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)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.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)))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 R (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.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)))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 (.f64 R lambda1) (pow.f64 (-.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)))) #s(literal 2 binary64)))))))
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (.f64 R lambda2) (-.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)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 lambda2 (-.f64 (.f64 R (-.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 (.f64 R lambda1) (-.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))))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 lambda2 (-.f64 (+.f64 (.f64 R (-.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 #s(literal 1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.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 (.f64 R lambda1) (-.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))))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))
(.f64 lambda2 (-.f64 (+.f64 (+.f64 (.f64 R (-.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 #s(literal 1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.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 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (-.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 lambda2 (.f64 lambda2 lambda2))))) (/.f64 (.f64 (.f64 R lambda1) (-.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))))) lambda2)))
(* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.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)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (-.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 (.f64 R lambda1) (-.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))))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (-.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 (.f64 (.f64 R lambda1) (-.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 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda2 (-.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))))))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (-.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 (.f64 (.f64 R lambda1) (-.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 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (-.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 R (.f64 (-.f64 phi1 phi2) (-.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))))))) lambda2)) lambda2)))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.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)))))))) (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) phi1)) #s(literal 2 binary64))) (*.f64 phi1 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 (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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 (.f64 R phi2) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))))) (.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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.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)))))))))))
(+ (* 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (.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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.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 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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 (.f64 R phi2) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.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 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))))) (.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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 R (/.f64 (.f64 R phi1) phi2)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64)))) (*.f64 phi2 phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2)))))))
(.f64 phi2 (+.f64 R (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 R (.f64 (.f64 phi1 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64)))) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 (.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64)))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R phi1) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) (/.f64 (.f64 R (.f64 (.f64 phi1 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64)))) 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))
(+ (* 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 R phi1) (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (.f64 R phi1) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))
(+ (* 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (.f64 R phi1) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))))))
(* 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 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64)))) (*.f64 phi1 phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 R (.f64 (.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64)))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) (*.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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64)))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 R phi2) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 R (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) (/.f64 (.f64 R (.f64 (.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64)))) phi1))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (-.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)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))) (.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 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (.f64 lambda1 (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (-.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)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))) (.f64 (.f64 lambda2 (pow.f64 (-.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)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (-.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)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))) (.f64 lambda1 (.f64 (.f64 (.f64 lambda2 (pow.f64 (-.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)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda2 lambda2) (pow.f64 (-.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)))) #s(literal 4 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2))) #s(literal 3 binary64))))))))) (.f64 (.f64 lambda2 (pow.f64 (-.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)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda2 lambda2)))))))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.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)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.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))))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.f64 (-.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.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 lambda1 lambda1)))) (/.f64 (.f64 lambda2 (-.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))))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.f64 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (-.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 lambda1 (.f64 lambda1 lambda1)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.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 lambda1 lambda1)))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (.f64 lambda2 (-.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))))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.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)))) (neg.f64 lambda1))
(* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.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))))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (.f64 lambda2 (-.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 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1) (-.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))))))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (.f64 lambda2 (-.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 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (-.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 (-.f64 phi1 phi2) (-.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))))))) lambda1)) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (-.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)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.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)))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda1 (pow.f64 (-.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)))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.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)))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1)))))) (.f64 (.f64 lambda1 (.f64 (.f64 lambda2 (pow.f64 (-.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)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.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)))) #s(literal 4 binary64)) (.f64 lambda1 lambda1)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (pow.f64 (-.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)))) #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 (-.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)))) #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 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 lambda1))))) (.f64 lambda1 (pow.f64 (-.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)))) #s(literal 2 binary64)))))))
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.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)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (-.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.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 lambda2 lambda2)))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (-.f64 (+.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.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 lambda2 lambda2)))) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 lambda2 (.f64 lambda2 lambda2))) (/.f64 (.f64 lambda1 (.f64 (-.f64 phi1 phi2) (-.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 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.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)))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (.f64 lambda1 (-.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 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2) (-.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))))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (.f64 lambda1 (-.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 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (.f64 lambda1 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (-.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 (-.f64 phi1 phi2) (-.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))))))) lambda2)) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))) (.f64 #s(literal 1/2 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)))))) (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) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))
(+ (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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))))) (.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))))) (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) phi1)) #s(literal 2 binary64))) (.f64 phi1 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/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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))) (.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 (.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))) (.f64 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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))))) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.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 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))) (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) phi1)) #s(literal 2 binary64))) (.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 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) (*.f64 phi2 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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 phi1 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64)))) phi2)) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 phi1 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) phi2))) phi2)) phi2)))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(+ (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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))
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 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) (*.f64 phi1 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.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)))) #s(literal 2 binary64))) (.f64 phi1 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) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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)) (pow.f64 (-.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)))) #s(literal 2 binary64)))) phi1)) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 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 (.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)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 phi2 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.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)))) #s(literal 2 binary64))) phi1))) phi1)) phi1)))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.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)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (.f64 lambda1 (-.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 lambda2 (-.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))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (.f64 lambda1 (-.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 lambda2 (-.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))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (.f64 lambda1 (-.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 lambda2 (-.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))))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.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)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.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))))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.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))))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.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))))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.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)))))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (-.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))))) lambda1) (-.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))))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (-.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))))) lambda1) (-.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))))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (-.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))))) lambda1) (-.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))))) (neg.f64 lambda1))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda1 (-.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)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (.f64 lambda1 (-.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 lambda2 (-.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))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (.f64 lambda1 (-.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 lambda2 (-.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))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (.f64 lambda1 (-.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 lambda2 (-.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))))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.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)))))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (-.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))))) lambda2) (-.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))))))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (-.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))))) lambda2) (-.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))))))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(.f64 lambda2 (-.f64 (/.f64 (.f64 lambda1 (-.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))))) lambda2) (-.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))))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.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)))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* (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 (.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))) (* -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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (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 #s(literal -1/2 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal -1/8 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal 1/48 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (-.f64 lambda1 lambda2) (-.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)))))
(* -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 (* 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 #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 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 #s(literal 1/48 binary64) (.f64 (.f64 lambda2 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) 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 (- 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* lambda2 (* phi2 (sin (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1))))
(+.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.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 #s(literal -1/8 binary64) phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 #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 (.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(+ (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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(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 #s(literal 0 binary64) (.f64 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 #s(literal 0 binary64) (.f64 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 #s(literal 0 binary64) (.f64 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 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 (.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) 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 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* 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 #s(literal 0 binary64) (.f64 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 #s(literal 0 binary64) (.f64 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 #s(literal 0 binary64) (.f64 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 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 (.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) 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 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64)))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* 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 (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) 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 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 #s(literal -1/8 binary64) (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal 1/48 binary64) R) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* R (* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))))
(.f64 (.f64 R lambda1) (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* 1/2 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))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))
(+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(* lambda1 (cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))))
(.f64 lambda1 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))))
(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 #s(literal -1/8 binary64) phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 #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 (.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(+ (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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(cos (* phi1 (- 1/2 (* -1/2 (/ phi2 phi1)))))
(cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 lambda2 (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 lambda2 (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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(.f64 (-.f64 (/.f64 (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal -1/2 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal -1/8 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 #s(literal 1/48 binary64) phi1) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (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 (.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))) (* -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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* 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 #s(literal -1/2 binary64) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (.f64 (-.f64 lambda1 lambda2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.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 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(* 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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(+ (* -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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(+ (* 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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 R 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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))) (.f64 R (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))
(+ (* 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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda1 (-.f64 (.f64 lambda1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (.f64 (.f64 R lambda1) (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (-.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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))))) (.f64 R (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal 1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (.f64 lambda1 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (.f64 lambda1 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)))
(* -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 (* 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 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) 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 (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (.f64 (.f64 R lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 R lambda2) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1)) (neg.f64 lambda1))
(* 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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))
(+ (* -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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 R (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))))
(+ (* 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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda2) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (* 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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda2 (-.f64 (.f64 lambda2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 lambda1 (.f64 (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 (.f64 R lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal 1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 (+.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 (/.f64 #s(literal 1/2 binary64) (.f64 lambda2 lambda2)) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) 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 #s(literal 0 binary64) lambda2) (-.f64 (.f64 R (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (.f64 (.f64 R lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 R lambda1) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) lambda2)))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))
(+ (* 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 R phi1) (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (.f64 R phi1) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))
(+ (* 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (.f64 R phi1) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))))))
(* 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 #s(literal 1/2 binary64) R) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 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 R (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 R (.f64 phi2 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 phi1 (.f64 phi1 phi1))) (.f64 R (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (-.f64 R (/.f64 (.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) 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 (.f64 #s(literal -1/2 binary64) (.f64 R (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) phi1)) 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 (.f64 R (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 R (.f64 phi2 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.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)))))))) (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) phi1)) #s(literal 2 binary64))) (*.f64 phi1 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 (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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 (.f64 R phi2) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))))) (.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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.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)))))))))))
(+ (* 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (.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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.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 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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (.f64 (.f64 R phi2) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.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 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))))) (.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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.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 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 phi2 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 (.f64 (/.f64 (.f64 R phi1) 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 R (.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) 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 (.f64 R (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 R phi1) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) 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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(+ (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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (.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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (-.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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))) (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
(+ (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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (-.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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.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 (.f64 lambda2 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) #s(literal 3 binary64))))))))) (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* 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 lambda2 (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)) (* 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 lambda2 (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 (.f64 lambda1 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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))))))))))
(.f64 lambda1 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda1 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (/.f64 (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))))
(* -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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) 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 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 lambda2 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))
(+ (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))))
(+ (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda1 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))))
(+ (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))))))) (.f64 lambda1 (.f64 (.f64 (.f64 lambda2 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (-.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (.f64 (.f64 lambda1 lambda1) (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 (.f64 lambda1 lambda1) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))))) (.f64 lambda1 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 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))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(.f64 lambda2 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (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)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(.f64 lambda2 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (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 (.f64 lambda2 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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))))))))))
(.f64 lambda2 (+.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (/.f64 lambda1 lambda2) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 (.f64 lambda2 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 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)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 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)))))
(.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 lambda1 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) lambda2)))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 phi1 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(+ (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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))
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 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 phi1 phi1)))))
(* 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (.f64 phi1 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 (* -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 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) 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)))))
(.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 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 (.f64 phi2 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) phi1))) phi1)) phi1)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))) (.f64 #s(literal 1/2 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)))))) (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) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))
(+ (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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))))) (.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))))) (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) phi1)) #s(literal 2 binary64))) (.f64 phi1 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/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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))) (.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 (.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))) (.f64 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) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))))) (.f64 phi2 (.f64 (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (.f64 #s(literal -1/2 binary64) (/.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 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #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) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1)))))) (+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (.f64 phi1 phi1))))) (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) phi1)) #s(literal 2 binary64))) (.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 phi2))) 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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (.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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2) (/.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (.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 (-.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 (* -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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) 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 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (/.f64 (.f64 phi1 (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) phi2))) phi2)) phi2)))
(/ -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(/.f64 (/.f64 #s(literal -1 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(- (* -1 (/ lambda1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (/.f64 (neg.f64 lambda1) (.f64 (.f64 lambda2 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (/.f64 #s(literal 1 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(- (* lambda1 (- (* -1 (/ lambda1 (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (.f64 lambda1 (-.f64 (/.f64 (neg.f64 lambda1) (.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (/.f64 (/.f64 #s(literal 1 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(- (* lambda1 (- (* lambda1 (- (* -1 (/ lambda1 (* (pow lambda2 4) (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (.f64 lambda1 (-.f64 (.f64 lambda1 (-.f64 (/.f64 (neg.f64 lambda1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (pow.f64 lambda2 #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (/.f64 #s(literal 1 binary64) (.f64 (.f64 lambda2 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (/.f64 (/.f64 #s(literal 1 binary64) lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(/.f64 (/.f64 #s(literal 1 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/ (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda1)
(/ (- (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ (pow lambda2 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))) lambda1)
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (+.f64 (/.f64 (/.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)
(/ (- (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ (pow lambda2 3) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* -1 (/ (pow lambda2 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))) lambda1)
(/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (+.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (.f64 lambda2 lambda2) (.f64 lambda1 lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))) lambda1)
(/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(/.f64 (/.f64 #s(literal 1 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (/ (- (* -1 (/ lambda2 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda1))
(* -1 (/ (- (* -1 (/ (- (/ (pow lambda2 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* -1 (/ lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (/.f64 (.f64 lambda2 lambda2) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda1)) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda1))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow lambda2 3) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (/ (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* -1 (/ lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(/.f64 (neg.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 lambda2 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda1)) (/.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda1)) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)
(/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(/.f64 (/.f64 #s(literal 1 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))
(+.f64 (/.f64 (/.f64 #s(literal 1 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 lambda2 (.f64 (.f64 lambda1 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(+ (* lambda2 (+ (/ 1 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(+.f64 (/.f64 (/.f64 #s(literal 1 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 lambda2 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 lambda2 (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))
(+ (* lambda2 (+ (* lambda2 (+ (/ 1 (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2))))) (/ lambda2 (* (pow lambda1 4) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))) (/ 1 (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(+.f64 (/.f64 (/.f64 #s(literal 1 binary64) lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (.f64 lambda2 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (.f64 lambda2 (+.f64 (/.f64 #s(literal 1 binary64) (.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (/.f64 lambda2 (pow.f64 lambda1 #s(literal 4 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))))))
(/ -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(/.f64 (/.f64 #s(literal -1 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(/ (- (* -1 (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda2)
(/ (- (* -1 (/ (pow lambda1 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))) lambda2)
(/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (.f64 lambda1 lambda1) (.f64 (.f64 lambda2 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)
(/ (- (* -1 (/ (pow lambda1 3) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (+ (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (/ (pow lambda1 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))) lambda2)
(/.f64 (-.f64 (/.f64 (neg.f64 (.f64 lambda1 (.f64 lambda1 lambda1))) (.f64 (.f64 lambda2 (.f64 lambda2 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 lambda1 lambda1) (.f64 (.f64 lambda2 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) lambda2)
(/ -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(/.f64 (/.f64 #s(literal -1 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (/ (+ (/ 1 (cos (* 1/2 (+ phi1 phi2)))) (/ lambda1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda2))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda2))
(* -1 (/ (+ (* -1 (/ (- (* -1 (/ (pow lambda1 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (/ lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (.f64 (/.f64 #s(literal -1 binary64) lambda2) (/.f64 (.f64 lambda1 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda2)) lambda2))
(* -1 (/ (+ (* -1 (/ (- (* -1 (/ (- (/ (pow lambda1 3) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* -1 (/ (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (/ lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (/ 1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (.f64 lambda1 lambda1) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda2)) (/.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) lambda2)) lambda2))
(/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(+ (* 1/2 (/ (* phi1 (sin (* 1/2 phi2))) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+.f64 (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) phi1) (sin.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 2 binary64)))))
(+ (* phi1 (- (* phi1 (- (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+.f64 (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.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 2 binary64))))))))
(+ (* phi1 (- (* phi1 (- (+ (* -1 (* phi1 (+ (* -1/2 (/ (* (sin (* 1/2 phi2)) (- (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (cos (* 1/2 phi2)))) (+ (* -1/16 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))) (* 1/48 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))))) (* 1/8 (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))) (* -1/4 (/ (pow (sin (* 1/2 phi2)) 2) (* (pow (cos (* 1/2 phi2)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi2)) (* (pow (cos (* 1/2 phi2)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+.f64 (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 phi1 (+.f64 (-.f64 (/.f64 #s(literal 1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)))))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (/.f64 (sin.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 2 binary64)))) #s(literal -1/24 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.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 2 binary64))))))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))))
(+ (* 1/2 (/ (* phi2 (sin (* 1/2 phi1))) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))
(+.f64 (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (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 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (* phi2 (- (* phi2 (- (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))
(+.f64 (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (* phi2 (- (* phi2 (- (+ (* -1 (* phi2 (+ (* -1/2 (/ (* (sin (* 1/2 phi1)) (- (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (cos (* 1/2 phi1)))) (+ (* -1/16 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))) (* 1/48 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))))) (* 1/8 (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))) (* -1/4 (/ (pow (sin (* 1/2 phi1)) 2) (* (pow (cos (* 1/2 phi1)) 3) (- lambda1 lambda2)))))) (* -1/2 (/ (sin (* 1/2 phi1)) (* (pow (cos (* 1/2 phi1)) 2) (- lambda1 lambda2)))))) (/ 1 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))))
(+.f64 (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 phi2 (+.f64 (-.f64 (/.f64 #s(literal 1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)))))))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal -1/24 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64))))))) (.f64 #s(literal 1/2 binary64) (/.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(/ 1 (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 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)))
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))
(.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/48 binary64) (.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))
(.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 phi2)) #s(literal 1/3840 binary64))))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))
(.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 #s(literal -1/645120 binary64) (.f64 phi2 phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/3840 binary64))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* 1/2 (* phi1 (sin (* 1/2 phi2))))
(.f64 (.f64 #s(literal 1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))
(.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 #s(literal -1/48 binary64) (.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))
(.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (.f64 (.f64 #s(literal 1/3840 binary64) (.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))
(.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/645120 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 phi1))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1/3840 binary64))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(+ (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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(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 #s(literal -1/8 binary64) phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 #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 (.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 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))))
(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 #s(literal -1/8 binary64) phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 #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 (.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(+ (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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(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)))

eval300.0ms (1.6%)

Compiler: Compiled 50597 to 3741 computations (92.6% saved)

prune245.0ms (1.3%)

Pruning

50 alts after pruning (48 fresh and 2 done)

	Pruned	Kept	Total
New	1358	23	1381
Fresh	4	25	29
Picked	4	1	5
Done	0	1	1
Total	1366	50	1416

Accuracy

100.0%

Counts

1416 → 50

Alt Table

Click to see full alt table

Status	Accuracy	Program
	7.7%	(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (.f64 R (.f64 phi1 (.f64 R phi1))))
	14.5%	(/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (.f64 R phi1))
	7.7%	(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
	19.2%	(-.f64 (.f64 (.f64 R lambda1) (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)))))
	52.1%	(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
	7.7%	(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
	14.1%	(.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 R phi1)))
	21.3%	(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
	14.1%	(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
	20.5%	(.f64 (.f64 R lambda2) (-.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)))))
	21.8%	(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	8.4%	(.f64 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	15.4%	(.f64 (neg.f64 (.f64 R lambda2)) (-.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)))))
	13.9%	(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
	11.3%	(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
	19.9%	(.f64 (neg.f64 (.f64 R lambda1)) (-.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)))))
	54.6%	(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
	25.6%	(.f64 lambda1 (-.f64 (.f64 R (-.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 (.f64 R lambda2) (-.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))))) lambda1)))
▶	99.9%	(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
	42.9%	(.f64 R (hypot.f64 (/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
	99.8%	(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
	99.8%	(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
	89.2%	(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 phi1 phi2)))
	88.3%	(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
	99.8%	(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
	89.2%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
	94.0%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
	89.2%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
	88.4%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
	48.3%	(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
	18.4%	(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
	15.4%	(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)))
	16.2%	(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) lambda1))
	20.0%	(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
	8.8%	(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
	9.1%	(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
	10.3%	(.f64 R (.f64 (+.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)))) (-.f64 #s(literal 0 binary64) lambda2)))
▶	8.8%	(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
	10.4%	(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
	15.8%	(.f64 R (.f64 (cos.f64 (.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) lambda2))
✓	12.4%	(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
	19.2%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
▶	8.4%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
	21.0%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
	11.2%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
	3.4%	(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
▶	3.3%	(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1))
	54.9%	(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
✓	29.4%	(*.f64 R phi2)
▶	32.3%	(neg.f64 (*.f64 R phi1))

Compiler

Compiled 2253 to 1443 computations (36% saved)

simplify240.0ms (1.3%)

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64))))
✓	cost-diff	0	(.f64 (cos.f64 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1)
✓	cost-diff	0	(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1))
✓	cost-diff	12928	(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))
✓	cost-diff	0	(cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64))))))
✓	cost-diff	0	(.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1)
✓	cost-diff	0	(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
✓	cost-diff	128	(.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1)
✓	cost-diff	0	(*.f64 #s(literal 1/2 binary64) phi2)
✓	cost-diff	0	(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
✓	cost-diff	0	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
✓	cost-diff	0	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
✓	cost-diff	-64	(neg.f64 (*.f64 R phi1))
✓	cost-diff	0	(*.f64 R phi1)
✓	cost-diff	0	(hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2))
✓	cost-diff	0	(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
✓	cost-diff	128	(.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
✓	cost-diff	6528	(fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))

Rules

3678×	`-lowering-.f32`
3678×	`-lowering-.f64`
2050×	`+-lowering-+.f64`
2050×	`+-lowering-+.f32`
946×	`neg-lowering-neg.f64`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	60	481
1	150	459
2	398	448
3	1827	448
4	5131	433
0	8211	433

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

Outputs
(* R (sqrt (+ (* (+ (* (- lambda1 lambda2) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (* (- lambda1 lambda2) (- 0 (* (sin (* phi2 1/2)) (sin (* 1/2 phi1)))))) (+ (* (- lambda1 lambda2) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (* (- lambda1 lambda2) (- 0 (* (sin (* phi2 1/2)) (sin (* 1/2 phi1))))))) (* (- phi1 phi2) (- phi1 phi2)))))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (+ (* (- lambda1 lambda2) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (* (- lambda1 lambda2) (- 0 (* (sin (* phi2 1/2)) (sin (* 1/2 phi1)))))) (+ (* (- lambda1 lambda2) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (* (- lambda1 lambda2) (- 0 (* (sin (* phi2 1/2)) (sin (* 1/2 phi1))))))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))
(+ (* (- lambda1 lambda2) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (* (- lambda1 lambda2) (- 0 (* (sin (* phi2 1/2)) (sin (* 1/2 phi1))))))
(.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(cos (* phi2 1/2))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(* phi2 1/2)
(*.f64 phi2 #s(literal 1/2 binary64))
phi2
1/2
#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)
phi1
(* (- lambda1 lambda2) (- 0 (* (sin (* phi2 1/2)) (sin (* 1/2 phi1)))))
(.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda2 lambda1)))
(- 0 (* (sin (* phi2 1/2)) (sin (* 1/2 phi1))))
(-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
0
#s(literal 0 binary64)
(* (sin (* phi2 1/2)) (sin (* 1/2 phi1)))
(.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(sin (* phi2 1/2))
(sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(- phi1 phi2)
(-.f64 phi1 phi2)
(neg (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* R phi1)
(*.f64 R phi1)
R
phi1
(* R (* (cos (* 1/2 phi2)) lambda1))
(.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (*.f64 R lambda1))
R
(* (cos (* 1/2 phi2)) lambda1)
(.f64 lambda1 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(* 1/2 phi2)
(*.f64 phi2 #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
phi2
lambda1
(* R (* (cos (/ (* (+ 1/8 (/ (* (* phi2 (* phi2 phi2)) 1/8) (* phi1 (* phi1 phi1)))) phi1) (+ 1/4 (* (/ (* phi2 1/2) phi1) (- (/ (* phi2 1/2) phi1) 1/2))))) lambda1))
(.f64 (cos.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (+.f64 phi1 (.f64 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1)) #s(literal 1 binary64)))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (/.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))) phi1)))) (.f64 R lambda1))
R
(* (cos (/ (* (+ 1/8 (/ (* (* phi2 (* phi2 phi2)) 1/8) (* phi1 (* phi1 phi1)))) phi1) (+ 1/4 (* (/ (* phi2 1/2) phi1) (- (/ (* phi2 1/2) phi1) 1/2))))) lambda1)
(.f64 lambda1 (cos.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (+.f64 phi1 (.f64 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1)) #s(literal 1 binary64)))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (/.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))) phi1)))))
(cos (/ (* (+ 1/8 (/ (* (* phi2 (* phi2 phi2)) 1/8) (* phi1 (* phi1 phi1)))) phi1) (+ 1/4 (* (/ (* phi2 1/2) phi1) (- (/ (* phi2 1/2) phi1) 1/2)))))
(cos.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (+.f64 phi1 (.f64 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1)) #s(literal 1 binary64)))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (/.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))) phi1))))
(/ (* (+ 1/8 (/ (* (* phi2 (* phi2 phi2)) 1/8) (* phi1 (* phi1 phi1)))) phi1) (+ 1/4 (* (/ (* phi2 1/2) phi1) (- (/ (* phi2 1/2) phi1) 1/2))))
(/.f64 (.f64 #s(literal 1/8 binary64) (+.f64 phi1 (.f64 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1)) #s(literal 1 binary64)))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (/.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))) phi1)))
(* (+ 1/8 (/ (* (* phi2 (* phi2 phi2)) 1/8) (* phi1 (* phi1 phi1)))) phi1)
(.f64 #s(literal 1/8 binary64) (+.f64 phi1 (.f64 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (*.f64 phi1 phi1)) #s(literal 1 binary64))))
(+ 1/8 (/ (* (* phi2 (* phi2 phi2)) 1/8) (* phi1 (* phi1 phi1))))
(+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 phi2 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 phi2 phi1)) phi1))) phi1))
1/8
#s(literal 1/8 binary64)
(/ (* (* phi2 (* phi2 phi2)) 1/8) (* phi1 (* phi1 phi1)))
(/.f64 (.f64 phi2 (.f64 phi2 (/.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 phi2 phi1)) phi1))) phi1)
(* (* phi2 (* phi2 phi2)) 1/8)
(.f64 phi2 (.f64 phi2 (*.f64 phi2 #s(literal 1/8 binary64))))
(* phi2 (* phi2 phi2))
(.f64 phi2 (.f64 phi2 phi2))
phi2
(* phi2 phi2)
(*.f64 phi2 phi2)
(* phi1 (* phi1 phi1))
(.f64 phi1 (.f64 phi1 phi1))
phi1
(* phi1 phi1)
(*.f64 phi1 phi1)
(+ 1/4 (* (/ (* phi2 1/2) phi1) (- (/ (* phi2 1/2) phi1) 1/2)))
(+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (/.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))) phi1))
1/4
#s(literal 1/4 binary64)
(* (/ (* phi2 1/2) phi1) (- (/ (* phi2 1/2) phi1) 1/2))
(/.f64 (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (/.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))) phi1)
(/ (* phi2 1/2) phi1)
(*.f64 phi2 (/.f64 #s(literal 1/2 binary64) phi1))
(* phi2 1/2)
(*.f64 phi2 #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(- (/ (* phi2 1/2) phi1) 1/2)
(+.f64 (*.f64 phi2 (/.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64))
lambda1
(* R (* (cos (exp (* (log (/ 2 (+ phi1 phi2))) -1))) lambda1))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 R lambda1))
R
(* (cos (exp (* (log (/ 2 (+ phi1 phi2))) -1))) lambda1)
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(cos (exp (* (log (/ 2 (+ phi1 phi2))) -1)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(exp (* (log (/ 2 (+ phi1 phi2))) -1))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(* (log (/ 2 (+ phi1 phi2))) -1)
(-.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))
(log (/ 2 (+ phi1 phi2)))
(log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))
(/ 2 (+ phi1 phi2))
(/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))
2
#s(literal 2 binary64)
(+ phi1 phi2)
(+.f64 phi2 phi1)
phi1
phi2
-1
#s(literal -1 binary64)
lambda1

localize591.0ms (3.1%)

Localize:

Found 18 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.9%	(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1))
✓	accuracy	99.9%	(.f64 (cos.f64 (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1)
✓	accuracy	95.7%	(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))
✓	accuracy	87.5%	(cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64))))
✓	accuracy	95.9%	(.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1)
✓	accuracy	87.5%	(cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64))))))
✓	accuracy	86.6%	(/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (*.f64 phi1 phi1)))
✓	accuracy	70.5%	(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))
✓	accuracy	100.0%	(*.f64 #s(literal 1/2 binary64) phi2)
✓	accuracy	100.0%	(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
✓	accuracy	99.9%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
✓	accuracy	99.9%	(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
✓	accuracy	100.0%	(*.f64 R phi1)
✓	accuracy	100.0%	(neg.f64 (*.f64 R phi1))
✓	accuracy	99.9%	(.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓	accuracy	99.9%	(.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓	accuracy	99.8%	(fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
✓	accuracy	97.4%	(.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))

Results

247.0ms	90×	1	valid
174.0ms	130×	0	invalid
81.0ms	36×	0	valid

Compiler

Compiled 545 to 57 computations (89.5% saved)

Precisions

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

ival-sin: 61.0ms (26.3% of total)

ival-mult: 60.0ms (25.8% of total)

ival-cos: 38.0ms (16.4% of total)

compiled-spec: 16.0ms (6.9% of total)

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

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

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

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

ival-exp: 6.0ms (2.6% of total)

ival-log: 6.0ms (2.6% of total)

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

const: 1.0ms (0.4% of total)

ival-neg: 1.0ms (0.4% of total)

series178.0ms (0.9%)

Counts

22 → 696

Calls

Call 1

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

Outputs
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))>
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))>
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))>
#<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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))>
#<alt (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/3840 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* 1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/3840 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/645120 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))>
#<alt (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/3840 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))>
#<alt (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/3840 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/645120 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))>
#<alt (* lambda1 (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))>
#<alt (* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))))>
#<alt (* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))>
#<alt (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (* R (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* lambda2 (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))>
#<alt (* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2))))>
#<alt (* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))))>
#<alt (* -1 (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))>
#<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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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/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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))))>
#<alt (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))>
#<alt (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))>
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))>
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))>
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))))>
#<alt (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))>
#<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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) 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/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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) 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 (* -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 (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R lambda1)>
#<alt (+ (* -1/8 (* R (* lambda1 (pow phi2 2)))) (* R lambda1))>
#<alt (+ (* R lambda1) (* (pow phi2 2) (+ (* -1/8 (* R lambda1)) (* 1/384 (* R (* lambda1 (pow phi2 2)))))))>
#<alt (+ (* R lambda1) (* (pow phi2 2) (+ (* -1/8 (* R lambda1)) (* (pow phi2 2) (+ (* -1/46080 (* R (* lambda1 (pow phi2 2)))) (* 1/384 (* R lambda1)))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt lambda1>
#<alt (+ lambda1 (* -1/8 (* lambda1 (pow phi2 2))))>
#<alt (+ lambda1 (* (pow phi2 2) (+ (* -1/8 lambda1) (* 1/384 (* lambda1 (pow phi2 2))))))>
#<alt (+ lambda1 (* (pow phi2 2) (+ (* -1/8 lambda1) (* (pow phi2 2) (+ (* -1/46080 (* lambda1 (pow phi2 2))) (* 1/384 lambda1))))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<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)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/2 phi2)>
#<alt (* 1/8 phi1)>
#<alt (+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))>
#<alt (+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))>
#<alt (+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 2)))>
#<alt (* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))>
#<alt (* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))>
#<alt (* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 2)))>
#<alt (* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))>
#<alt (* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))>
#<alt (* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 2)))>
#<alt (/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))>
#<alt (/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))>
#<alt (/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))>
#<alt (* 1/8 phi1)>
#<alt (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))>
#<alt (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))>
#<alt (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))>
#<alt (* 1/8 phi1)>
#<alt (* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))>
#<alt (* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))>
#<alt (* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 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))))) (* phi2 (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))>
#<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 (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))>
#<alt (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 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/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 (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))>
#<alt (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))>
#<alt (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))>
#<alt (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))>
#<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 (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<alt (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))>
#<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 (* 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 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 (* lambda1 (cos (* 1/2 phi2)))>
#<alt (+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))>
#<alt (+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (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 (sin (* 1/2 phi1))))>
#<alt (* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))>
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))>
#<alt (* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* 1/2 (* phi1 (sin (* 1/2 phi2))))>
#<alt (* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))>
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))>
#<alt (* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))>
#<alt (+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (cos (* 1/2 phi2))>
#<alt (+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))>
#<alt (+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))>
#<alt (+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<alt (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))>
#<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 (/ (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2))) (pow phi2 2)))) (* -1/2 (/ phi1 phi2))))>
#<alt (* phi2 (- (+ 1/2 (* -1 (/ (* phi1 (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) (pow phi2 3)))) (+ (* -1/2 (/ phi1 phi2)) (+ (* -1/2 (/ (pow phi1 2) (pow phi2 2))) (* 1/2 (/ (pow phi1 2) (pow phi2 2)))))))>
#<alt (* 1/2 phi2)>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* phi2 (- (* -1 (/ (- (+ (* -1/2 (/ (pow phi1 2) phi2)) (* 1/2 (/ (pow phi1 2) phi2))) (* -1/2 phi1)) phi2)) 1/2)))>
#<alt (* -1 (* phi2 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* phi1 (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) phi2)) (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) phi2)) (* -1/2 phi1)) phi2)) 1/2)))>
#<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 (/ (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2))) (pow phi1 2)))) (* -1/2 (/ phi2 phi1))))>
#<alt (* phi1 (- (+ 1/2 (* -1 (/ (* phi2 (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2)))) (pow phi1 3)))) (+ (* -1/2 (/ phi2 phi1)) (+ (* -1/2 (/ (pow phi2 2) (pow phi1 2))) (* 1/2 (/ (pow phi2 2) (pow phi1 2)))))))>
#<alt (* 1/2 phi1)>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2))) phi1)) (* 1/2 phi2)) phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (pow phi2 2)) (+ (* 1/2 (pow phi2 2)) (/ (* phi2 (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2)))) phi1))) phi1)) (* 1/2 phi2)) phi1)) 1/2)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>
#<alt (* 1/8 (/ (pow phi2 3) (pow phi1 3)))>

Calls

174 calls:

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

rewrite388.0ms (2.1%)

Algorithm

1×	batch-egg-rewrite

Rules

3108×	`-lowering-.f32`
3108×	`-lowering-.f64`
2654×	`fma-lowering-fma.f32`
2654×	`fma-lowering-fma.f64`
1752×	`+-lowering-+.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	60	326
1	294	263
2	2622	256
0	8231	256

Stop Event

1×	iter limit
1×	node limit

Counts

22 → 268

Calls

Call 1

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

Outputs
(+.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal 1 binary64)))
(-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)))
(-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(-.f64 (/.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (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))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(fma.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.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 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.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 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (-.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.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 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(/.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.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 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.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 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))))))
(/.f64 (neg.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))) (neg.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 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) (+.f64 phi2 phi1)))) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))
(pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))))) (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.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 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))) #s(literal -1 binary64))
(.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2))
(.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.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 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))))))))
(.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))))
(.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 1 binary64)))
(.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(.f64 (pow.f64 (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.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 #s(literal 1 binary64) (+.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 2 binary64)) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))) #s(literal 1 binary64)))
(+.f64 (.f64 (-.f64 lambda1 lambda2) #s(literal 0 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (.f64 lambda1 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 lambda1 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 lambda1 lambda2) #s(literal 0 binary64) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) lambda1 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2)))
(neg.f64 (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)))
(neg.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #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 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 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (-.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 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 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (.f64 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #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 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 (-.f64 (.f64 lambda1 lambda1) (.f64 lambda2 lambda2)) (-.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 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 lambda1 lambda2) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #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 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 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #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 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 lambda1 lambda2)))
(/.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 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 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2)))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.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 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 lambda1 lambda1) (.f64 lambda2 lambda2))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)))
(/.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (sin.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 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 (-.f64 lambda1 lambda2) (-.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 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 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.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 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.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))) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.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)) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 lambda1 lambda2))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) #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 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 (-.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 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 lambda1 lambda2)) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)))
(.f64 (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2)) R)
(exp.f64 (.f64 (log.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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.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) (+.f64 phi2 phi1)))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(sqrt.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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 (hypot.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 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) (+.f64 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 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 #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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.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 #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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 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) (+.f64 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(.f64 (hypot.f64 (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 phi1 phi2)) (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #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) (+.f64 phi2 phi1)))) #s(literal 4 binary64)) (.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 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) (+.f64 phi2 phi1)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 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 #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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(.f64 (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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (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 phi2 phi1)))))) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(*.f64 phi1 R)
(*.f64 R phi1)
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(neg.f64 (*.f64 phi1 R))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 (.f64 phi1 R) (.f64 phi1 R)) (.f64 phi1 R))) (+.f64 #s(literal 0 binary64) (+.f64 (.f64 (.f64 phi1 R) (.f64 phi1 R)) (.f64 #s(literal 0 binary64) (.f64 phi1 R)))))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 phi1 R) (.f64 phi1 R))) (+.f64 #s(literal 0 binary64) (.f64 phi1 R)))
(*.f64 phi1 (-.f64 #s(literal 0 binary64) R))
(*.f64 R (-.f64 #s(literal 0 binary64) phi1))
(.f64 (.f64 phi1 R) #s(literal -1 binary64))
(.f64 #s(literal -1 binary64) (.f64 phi1 R))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) R)
(*.f64 (-.f64 #s(literal 0 binary64) R) phi1)
(.f64 lambda1 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R))
(.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (*.f64 lambda1 R))
(.f64 R (.f64 lambda1 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))
(.f64 (.f64 lambda1 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) R)
(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
(.f64 (.f64 R lambda1) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(.f64 lambda1 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))))
(.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) lambda1)
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(*.f64 phi2 #s(literal 1/2 binary64))
(*.f64 #s(literal 1/2 binary64) phi2)
(+.f64 (.f64 phi1 #s(literal 1/8 binary64)) (.f64 phi1 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))))
(+.f64 (.f64 phi1 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (*.f64 phi1 #s(literal 1/8 binary64)))
(+.f64 (.f64 #s(literal 1/8 binary64) phi1) (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1))) phi1))
(+.f64 (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) phi1) (*.f64 #s(literal 1/8 binary64) phi1))
(fma.f64 phi1 #s(literal 1/8 binary64) (.f64 phi1 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))
(fma.f64 phi1 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (.f64 phi1 #s(literal 1/8 binary64)))
(fma.f64 #s(literal 1/8 binary64) phi1 (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) phi1))
(fma.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) phi1 (.f64 #s(literal 1/8 binary64) phi1))
(/.f64 (.f64 (+.f64 #s(literal 1/512 binary64) (/.f64 (.f64 #s(literal 1/512 binary64) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi2 (.f64 phi2 phi2))))) (.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi1 (.f64 phi1 phi1)))))) phi1) (+.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1))) #s(literal -1/8 binary64)))))
(/.f64 (.f64 (-.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)))) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (-.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))))
(/.f64 (.f64 phi1 (+.f64 #s(literal 1/512 binary64) (/.f64 (.f64 #s(literal 1/512 binary64) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi2 (.f64 phi2 phi2))))) (.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi1 (.f64 phi1 phi1))))))) (+.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1))) #s(literal -1/8 binary64)))))
(/.f64 (.f64 phi1 (-.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)))) (.f64 phi1 (.f64 phi1 phi1))))) (-.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))))
(.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))
(.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) phi1)
(.f64 lambda1 (.f64 R (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))))
(.f64 R (.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))))
(.f64 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))))) (.f64 lambda1 R))
(.f64 (.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))) R)
(.f64 (.f64 R (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))) lambda1)
(.f64 (.f64 R lambda1) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))))))))
(.f64 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))))))) lambda1)
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))))))
(cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))
(exp.f64 (log.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal -1 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1)) #s(literal -2 binary64))
(/.f64 (+.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 (.f64 phi1 phi1))) (.f64 #s(literal 2 binary64) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))
(/.f64 (-.f64 (.f64 phi1 phi1) (.f64 phi2 phi2)) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (+.f64 phi2 phi1))))
(/.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 #s(literal -2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1)))))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))
(pow.f64 (pow.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) #s(literal -1/2 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 (+.f64 phi2 phi1) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(*.f64 #s(literal -1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))))
(.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 (.f64 phi1 phi1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))
(.f64 lambda1 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(.f64 R (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))
(.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (.f64 lambda1 R))
(.f64 (.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) R)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R lambda1) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) lambda1)
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(+.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 0 binary64))
(-.f64 (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64)))
(fma.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 0 binary64))
(fma.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal 0 binary64))
(fma.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1/2 binary64) #s(literal 0 binary64))
(/.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(/.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 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 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (neg.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -2 binary64))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (.f64 (sin.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 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)))))))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) #s(literal -1 binary64))
(.f64 (sin.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)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(.f64 (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 1/2 binary64))
(/.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))))
(/.f64 (neg.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) #s(literal -1 binary64))
(.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(.f64 (+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64))
(exp.f64 (.f64 (log.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))))))
(neg.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))
(/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))))))
(/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))) #s(literal 1 binary64)))
(/.f64 (.f64 (+.f64 #s(literal 1/512 binary64) (/.f64 (.f64 #s(literal 1/512 binary64) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi2 (.f64 phi2 phi2))))) (.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi1 (.f64 phi1 phi1)))))) phi1) (.f64 (+.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) #s(literal -1/8 binary64)))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))
(/.f64 (.f64 (-.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)))) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (.f64 (-.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) phi1))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))))))
(/.f64 (.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) #s(literal 1 binary64)) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))))))
(/.f64 (.f64 (+.f64 #s(literal 1/512 binary64) (/.f64 (.f64 #s(literal 1/512 binary64) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi2 (.f64 phi2 phi2))))) (.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi1 (.f64 phi1 phi1)))))) (/.f64 phi1 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))))) (+.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (+.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1))) #s(literal -1/8 binary64)))))
(/.f64 (.f64 (-.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)))) (.f64 phi1 (.f64 phi1 phi1)))) (/.f64 phi1 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))))) (-.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))))) (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(.f64 phi1 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))))))))
(.f64 phi1 (/.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))
(.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (/.f64 phi1 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))))
(.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64)))))))
(.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))))))))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64)))))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))) (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1))))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))))) #s(literal -1 binary64)))
(.f64 (/.f64 phi1 (+.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))
(.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) (.f64 (.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64))) (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)))))) (+.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))) (-.f64 (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 1/4 binary64)))))
(.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (-.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64))) (.f64 (.f64 phi2 #s(literal 1/2 binary64)) (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)))) (.f64 phi1 phi1)))) (-.f64 #s(literal 1/4 binary64) (/.f64 (+.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal -1/2 binary64)) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))))))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1)) #s(literal 3 binary64)))
(exp.f64 (.f64 (log.f64 (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (-.f64 #s(literal 0 binary64) (.f64 phi1 (*.f64 phi1 phi1)))))
(neg.f64 (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal -1/8 binary64)) (.f64 phi1 (*.f64 phi1 phi1))))
(/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (*.f64 phi2 phi2))))))
(/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal -1/8 binary64)) (-.f64 #s(literal 0 binary64) (.f64 phi1 (*.f64 phi1 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (*.f64 phi2 phi2)))))
(/.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (*.f64 phi2 phi2)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 phi1 phi1) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) phi1)))
(/.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) phi1) (.f64 phi1 phi1))
(/.f64 (.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) #s(literal 1 binary64)) (.f64 phi1 (.f64 phi1 phi1)))
(/.f64 (neg.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal -1/8 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 phi1 (*.f64 phi1 phi1)))))
(/.f64 (neg.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) phi1)) (neg.f64 (.f64 phi1 phi1)))
(/.f64 (.f64 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) phi1) #s(literal 1/8 binary64)) (.f64 phi1 phi1))
(/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) (/.f64 #s(literal 1/8 binary64) (.f64 phi1 phi1))) phi1)
(/.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 phi1)) phi1)
(/.f64 (/.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (*.f64 phi2 phi2))) phi1) phi1) phi1)
(pow.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 3 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3/2 binary64))
(pow.f64 (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal -3 binary64))
(pow.f64 (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (*.f64 phi2 phi2)))) #s(literal -1 binary64))
(pow.f64 (.f64 (.f64 (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))) (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (*.f64 phi2 phi2)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (.f64 phi1 phi1) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) phi1)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal -3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1))) #s(literal 3 binary64))
(.f64 phi2 (.f64 (.f64 phi2 phi2) (/.f64 (/.f64 #s(literal 1/8 binary64) (.f64 phi1 phi1)) phi1)))
(.f64 phi2 (.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1)))))
(.f64 phi2 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)) (.f64 phi1 (*.f64 phi1 phi1))))
(.f64 #s(literal 1/8 binary64) (.f64 (.f64 phi2 (.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1)))))
(.f64 #s(literal 1/8 binary64) (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 (*.f64 phi1 phi1))))
(*.f64 #s(literal 1/8 binary64) (pow.f64 (/.f64 phi2 phi1) #s(literal 3 binary64)))
(.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 phi2 (/.f64 #s(literal 1 binary64) phi1)) #s(literal 3 binary64)))
(.f64 (.f64 phi2 phi2) (.f64 phi2 (/.f64 (/.f64 #s(literal 1/8 binary64) (.f64 phi1 phi1)) phi1)))
(.f64 (.f64 phi2 (.f64 phi2 phi2)) (/.f64 (/.f64 #s(literal 1/8 binary64) (.f64 phi1 phi1)) phi1))
(.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))))
(.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (/.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))))
(.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal -1/8 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (.f64 phi1 (.f64 phi1 phi1)))))
(.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal -1/8 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)) #s(literal 3 binary64)))
(.f64 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) phi1) (/.f64 #s(literal 1/8 binary64) (.f64 phi1 phi1)))
(.f64 (/.f64 #s(literal 1/8 binary64) (.f64 phi1 phi1)) (/.f64 (.f64 phi2 (.f64 phi2 phi2)) phi1))
(.f64 (/.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64)))) (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1))
(.f64 #s(literal 1 binary64) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))
(.f64 (/.f64 #s(literal 1 binary64) phi1) (pow.f64 (/.f64 (.f64 phi1 phi1) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (*.f64 phi2 phi2)))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 (.f64 phi1 phi1))) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)))) #s(literal -1 binary64)))
(.f64 (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) phi1) (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(.f64 (/.f64 (/.f64 #s(literal 1/8 binary64) (.f64 phi1 phi1)) phi1) (.f64 phi2 (.f64 phi2 phi2)))
(.f64 (/.f64 phi2 phi1) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)) (.f64 phi1 phi1)))
(.f64 (/.f64 phi2 (.f64 phi1 phi1)) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2)) phi1))
(.f64 (/.f64 #s(literal 1/8 binary64) phi1) (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1)))
(.f64 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1)) (/.f64 #s(literal 1/8 binary64) phi1))
(.f64 (pow.f64 (/.f64 phi1 (.f64 phi2 #s(literal 1/2 binary64))) #s(literal -3/2 binary64)) (pow.f64 (/.f64 phi1 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal -3/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (.f64 phi1 phi1)) (/.f64 (.f64 phi2 (.f64 #s(literal 1/8 binary64) (*.f64 phi2 phi2))) phi1))
(.f64 (pow.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 phi1 phi1) (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 phi1 #s(literal 1/8 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 (.f64 phi1 phi1) (.f64 phi2 (.f64 phi2 phi2))) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 phi1 phi1) (.f64 phi2 (.f64 phi2 phi2))) #s(literal -1 binary64)) (pow.f64 (/.f64 phi1 #s(literal 1/8 binary64)) #s(literal -1 binary64)))
(.f64 (pow.f64 (/.f64 (.f64 phi1 phi1) phi2) #s(literal -1 binary64)) (pow.f64 (/.f64 phi1 (.f64 #s(literal 1/8 binary64) (.f64 phi2 phi2))) #s(literal -1 binary64)))

simplify748.0ms (4%)

Algorithm

1×	egg-herbie

Rules

8068×	`-lowering-.f32`
8068×	`-lowering-.f64`
5072×	`+-lowering-+.f64`
5072×	`+-lowering-+.f32`
1756×	`distribute-lft-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1139	19061
1	4139	17369
0	9101	17369

Stop Event

1×	iter limit
1×	node limit

Counts

696 → 696

Calls

Call 1

Inputs
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* (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)))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 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)))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))
(* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/3840 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* 1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/3840 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/645120 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/3840 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/3840 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/645120 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda1 (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))
(* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))))
(* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))))
(* -1 (* R (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(* R (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda2 (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))
(* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2))))
(* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))))
(* -1 (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* 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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)) (* R 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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1)))))
(sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) 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/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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) 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)
(* -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 (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R lambda1)
(+ (* -1/8 (* R (* lambda1 (pow phi2 2)))) (* R lambda1))
(+ (* R lambda1) (* (pow phi2 2) (+ (* -1/8 (* R lambda1)) (* 1/384 (* R (* lambda1 (pow phi2 2)))))))
(+ (* R lambda1) (* (pow phi2 2) (+ (* -1/8 (* R lambda1)) (* (pow phi2 2) (+ (* -1/46080 (* R (* lambda1 (pow phi2 2)))) (* 1/384 (* R lambda1)))))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
lambda1
(+ lambda1 (* -1/8 (* lambda1 (pow phi2 2))))
(+ lambda1 (* (pow phi2 2) (+ (* -1/8 lambda1) (* 1/384 (* lambda1 (pow phi2 2))))))
(+ lambda1 (* (pow phi2 2) (+ (* -1/8 lambda1) (* (pow phi2 2) (+ (* -1/46080 (* lambda1 (pow phi2 2))) (* 1/384 lambda1))))))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (cos (* 1/2 phi2)))
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)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/2 phi2)
(* 1/8 phi1)
(+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))
(+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))
(+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))
(* 1/8 (/ (pow phi2 3) (pow phi1 2)))
(* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))
(* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))
(* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))
(* 1/8 (/ (pow phi2 3) (pow phi1 2)))
(* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))
(* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))
(* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))
(* 1/8 (/ (pow phi2 3) (pow phi1 2)))
(/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))
(/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))
(/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))
(* 1/8 phi1)
(* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))
(* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))
(* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))
(* 1/8 phi1)
(* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))
(* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))
(* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 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))))) (* phi2 (+ (* -1/8 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))
(* 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 (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(* lambda1 (cos (* 1/2 phi1)))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))
(* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))
(* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))
(* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))
(* lambda1 (cos (* 1/2 phi2)))
(+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) 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 (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))
(cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))
(cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))
(cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))
(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 (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(* 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)))
(* 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 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)))))
(* lambda1 (cos (* 1/2 phi2)))
(+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* lambda1 (cos (* 1/2 phi1)))
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (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 (sin (* 1/2 phi1))))
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* 1/2 (* phi1 (sin (* 1/2 phi2))))
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* 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 (/ (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2))) (pow phi2 2)))) (* -1/2 (/ phi1 phi2))))
(* phi2 (- (+ 1/2 (* -1 (/ (* phi1 (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) (pow phi2 3)))) (+ (* -1/2 (/ phi1 phi2)) (+ (* -1/2 (/ (pow phi1 2) (pow phi2 2))) (* 1/2 (/ (pow phi1 2) (pow phi2 2)))))))
(* 1/2 phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1 (/ (- (+ (* -1/2 (/ (pow phi1 2) phi2)) (* 1/2 (/ (pow phi1 2) phi2))) (* -1/2 phi1)) phi2)) 1/2)))
(* -1 (* phi2 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* phi1 (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) phi2)) (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) phi2)) (* -1/2 phi1)) phi2)) 1/2)))
(* 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 (/ (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2))) (pow phi1 2)))) (* -1/2 (/ phi2 phi1))))
(* phi1 (- (+ 1/2 (* -1 (/ (* phi2 (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2)))) (pow phi1 3)))) (+ (* -1/2 (/ phi2 phi1)) (+ (* -1/2 (/ (pow phi2 2) (pow phi1 2))) (* 1/2 (/ (pow phi2 2) (pow phi1 2)))))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2))) phi1)) (* 1/2 phi2)) phi1)) 1/2)))
(* -1 (* phi1 (- (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (pow phi2 2)) (+ (* 1/2 (pow phi2 2)) (/ (* phi2 (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2)))) phi1))) phi1)) (* 1/2 phi2)) phi1)) 1/2)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))

Outputs
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (+.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda1 (-.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 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (+.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda1 (-.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 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(-.f64 (+.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda1 (-.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 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(.f64 lambda1 (-.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)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))
(.f64 lambda1 (-.f64 (-.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (/.f64 (.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))
(.f64 lambda1 (-.f64 (-.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (/.f64 (.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))
(.f64 lambda1 (-.f64 (-.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (/.f64 (.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(.f64 lambda1 (-.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)))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(+.f64 (.f64 lambda1 (-.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 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(+.f64 (.f64 lambda1 (-.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 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(+.f64 (.f64 lambda1 (-.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 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))
(.f64 lambda2 (-.f64 (-.f64 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))
(.f64 lambda2 (-.f64 (-.f64 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))
(.f64 lambda2 (-.f64 (-.f64 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(.f64 (-.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 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* (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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 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)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal -1/8 binary64) phi2) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 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)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 phi2 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/48 binary64) phi2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))))))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.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/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (.f64 (.f64 phi1 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 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)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal -1/8 binary64) phi1) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 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)))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1/48 binary64) phi1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2))))
(-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(-.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(-.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(-.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1))
(* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 lambda1))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))
(.f64 lambda1 (-.f64 (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))
(.f64 lambda1 (-.f64 (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))
(.f64 lambda1 (-.f64 (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 lambda1))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(-.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(-.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1))
(+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(-.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1))
(* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)))
(* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)))
(* lambda2 (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)))
(* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))
(-.f64 #s(literal 0 binary64) (.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))
(-.f64 #s(literal 0 binary64) (.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2))))
(-.f64 #s(literal 0 binary64) (.f64 lambda2 (-.f64 (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) 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)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1/48 binary64) (.f64 phi2 phi2)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/3840 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* 1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 #s(literal -1/3840 binary64) (.f64 phi2 phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal 1/48 binary64))))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* 1/48 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* (pow phi2 2) (+ (* -1/3840 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/645120 (* (pow phi2 2) (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))))))
(.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal 1/48 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal -1/3840 binary64)) (.f64 (.f64 #s(literal 1/645120 binary64) (.f64 phi2 phi2)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))))))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 phi1 #s(literal -1/2 binary64)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))
(.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (.f64 #s(literal 1/48 binary64) (.f64 phi1 phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))))
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/3840 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* 1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))
(.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #s(literal -1/3840 binary64) (.f64 phi1 phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))))))
(* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* 1/48 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* (pow phi1 2) (+ (* -1/3840 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/645120 (* (pow phi1 2) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))))))))
(.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal 1/48 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) #s(literal -1/3840 binary64)) (.f64 (.f64 #s(literal 1/645120 binary64) (.f64 phi1 phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))))))))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2))))
(.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (-.f64 lambda1 lambda2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))
(+.f64 (.f64 R (hypot.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (.f64 (.f64 R (.f64 (.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) 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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (.f64 R (hypot.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (.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 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (.f64 (.f64 lambda1 R) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) 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)))))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* R (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (.f64 R (hypot.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))) (.f64 lambda1 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) 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 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 lambda1 R) (.f64 (.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) 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 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #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 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))))))))
(* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(.f64 (.f64 lambda1 R) (-.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)))))
(* lambda1 (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))
(.f64 lambda1 (+.f64 (.f64 (-.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)))) R) (/.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))
(* lambda1 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1))))
(.f64 lambda1 (+.f64 (+.f64 (.f64 (-.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)))) R) (/.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (-.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 lambda1 lambda1)))))
(* lambda1 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)))))
(.f64 lambda1 (+.f64 (+.f64 (+.f64 (.f64 (-.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)))) R) (/.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (-.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 lambda1 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 (*.f64 lambda1 lambda1))))))
(* -1 (* R (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (neg.f64 (.f64 lambda1 R)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (+.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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 lambda1 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (-.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1)) (neg.f64 lambda1))
(* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))
(.f64 R (hypot.f64 (.f64 lambda1 (-.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 phi1 phi2)))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))
(+.f64 (.f64 R (hypot.f64 (.f64 lambda1 (-.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 phi1 phi2))) (.f64 (.f64 R (.f64 (.f64 lambda2 (.f64 lambda1 (-.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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (.f64 R (hypot.f64 (.f64 lambda1 (-.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 phi1 phi2))) (.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 lambda1 (-.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))))) #s(literal 2 binary64))))) (.f64 (.f64 R lambda2) (-.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 lambda1 R) (-.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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))
(+ (* R (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* R (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (.f64 R (hypot.f64 (.f64 lambda1 (-.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 phi1 phi2))) (.f64 lambda2 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))))) (.f64 (.f64 (.f64 lambda1 R) (-.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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 R lambda2) (.f64 (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda1 (-.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 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #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 lambda1 (-.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))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))))))))))
(* R (* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (.f64 R lambda2) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))
(.f64 lambda2 (+.f64 (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) R) (/.f64 (.f64 (.f64 lambda1 R) (-.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))))) lambda2)))
(* lambda2 (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2))))
(.f64 lambda2 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda2 lambda2))) (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) R)) (/.f64 (.f64 (.f64 lambda1 R) (-.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))))) lambda2)))
(* lambda2 (+ (* -1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* R (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)))))
(.f64 lambda2 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 R (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda2 lambda2))) (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) R)) (/.f64 (.f64 (.f64 lambda1 R) (-.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))))) lambda2)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 R (.f64 (.f64 lambda1 (-.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 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (.f64 lambda2 (*.f64 lambda2 lambda2)))))))
(* -1 (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(.f64 (neg.f64 (.f64 R lambda2)) (-.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)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 (-.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)))) R) (/.f64 (.f64 (.f64 lambda1 R) (-.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))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 (-.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)))) R) (/.f64 (+.f64 (.f64 (.f64 lambda1 R) (-.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 #s(literal -1/2 binary64) lambda2) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.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))))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(.f64 (-.f64 (.f64 (-.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)))) R) (/.f64 (-.f64 (.f64 (.f64 lambda1 R) (-.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 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 R (.f64 (.f64 lambda1 (-.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 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 lambda2 (pow.f64 (-.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)))) #s(literal 2 binary64)))) (/.f64 (.f64 R (.f64 (-.f64 phi1 phi2) (-.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))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(.f64 R (sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(+ (* 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi2 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.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 (* phi2 (- (+ 1 (+ (* -1/4 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 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))) #s(literal -1/4 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.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/2 (* (* R (* phi2 (- (+ (* 1/24 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (.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 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.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 phi2 R) (+.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)))) #s(literal 1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.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 #s(literal 1 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))) #s(literal -1/4 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 (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 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 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))) #s(literal -1/4 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))))))))
(* R phi2)
(*.f64 phi2 R)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 R (/.f64 (.f64 phi1 R) phi2)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 2)))))))
(.f64 phi2 (+.f64 (-.f64 R (/.f64 (.f64 phi1 R) phi2)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 phi1 R) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 (.f64 R (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2))))))
(* -1 (* R phi2))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 R))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(.f64 (-.f64 R (/.f64 (.f64 phi1 R) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 phi1 R) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi2))) phi2)) (* R phi1)) phi2)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 phi1 R) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 phi1 R) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))
(+ (* 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 phi1 R) (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 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) (pow (- lambda1 lambda2) 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (.f64 phi1 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))
(+ (* 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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) (pow (- lambda1 lambda2) 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 R (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) 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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (.f64 (.f64 phi1 R) (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 R (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))))))
(* R phi1)
(*.f64 phi1 R)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(.f64 phi1 (-.f64 R (/.f64 (.f64 phi2 R) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 phi2 R) phi1)) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) R) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 R (/.f64 (.f64 phi2 R) phi1)) (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 phi2 R) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (.f64 R (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(.f64 (-.f64 R (/.f64 (.f64 phi2 R) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (+.f64 (.f64 phi2 R) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 R (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) (* 1/2 (/ (* R (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2))) phi1))) phi1)) (* R phi2)) phi1)))))
(.f64 (-.f64 R (/.f64 (-.f64 (.f64 phi2 R) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 R (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (/.f64 (.f64 (.f64 phi2 R) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) phi1))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))
(hypot.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))
(+.f64 (hypot.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (.f64 (.f64 (.f64 lambda1 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) 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))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* 1/2 (* (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (hypot.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (.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 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))))) (.f64 (.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) 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))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* lambda1 (+ (* -1/2 (* (* lambda1 (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (hypot.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)) (.f64 lambda1 (+.f64 (.f64 (.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) 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))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))) (.f64 lambda1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 lambda1 (.f64 (.f64 (.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) 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 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #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 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))))) (-.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)) (/.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64)))))))))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(.f64 lambda1 (-.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)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))
(.f64 lambda1 (-.f64 (-.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (/.f64 (.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1))))))
(.f64 lambda1 (-.f64 (-.f64 (+.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.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 lambda1 lambda1)))) (/.f64 (.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda1)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (/ (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda1)))))))
(.f64 lambda1 (-.f64 (-.f64 (+.f64 (+.f64 (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.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 lambda1 lambda1)))) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (.f64 (pow.f64 (-.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)))) #s(literal 2 binary64)) (.f64 lambda1 (.f64 lambda1 lambda1))))) (/.f64 (.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) lambda1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (+.f64 (.f64 lambda2 (.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) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) (.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda2 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda1 (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (-.f64 (.f64 lambda2 (.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) (+.f64 (/.f64 (.f64 (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda1 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) (.f64 lambda2 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 lambda1))
(sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))
(hypot.f64 (.f64 lambda1 (-.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 phi1 phi2))
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))
(+.f64 (hypot.f64 (.f64 lambda1 (-.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 phi1 phi2)) (.f64 (.f64 (.f64 lambda2 (.f64 lambda1 (-.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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (hypot.f64 (.f64 lambda1 (-.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 phi1 phi2)) (.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 lambda1 (-.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))))) #s(literal 2 binary64))))) (.f64 lambda2 (-.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))))) (.f64 (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda1 (-.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))))))
(+ (sqrt (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* lambda2 (+ (* -1/2 (* (* lambda2 (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2)))))))) (* (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (sqrt (/ 1 (+ (pow (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) 2) (pow (- phi1 phi2) 2))))))))
(+.f64 (hypot.f64 (.f64 lambda1 (-.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 phi1 phi2)) (.f64 lambda2 (+.f64 (.f64 (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda1 (-.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))) (.f64 lambda2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda2 (.f64 (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda1 (-.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 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))) #s(literal 3 binary64)))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))) (-.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (.f64 (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64))) (+.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (.f64 lambda1 (-.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))))) #s(literal 2 binary64)))))))))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))
(.f64 lambda2 (-.f64 (-.f64 (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2))))))
(.f64 lambda2 (-.f64 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) lambda2)) (+ (* -1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (pow (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))) (/ (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) lambda2)))))))
(.f64 lambda2 (-.f64 (-.f64 (+.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 lambda2 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (.f64 lambda1 (-.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 lambda2 (.f64 lambda2 lambda2)))))) (/.f64 (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) lambda2)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(.f64 (-.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 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (.f64 lambda1 (-.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))))) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) (.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2) (-.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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (+ (* -1 (/ (+ (* 1/2 (/ (* (+ (* -1 (* lambda1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (pow (- phi1 phi2) 2)) (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* lambda1 (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(.f64 (-.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (-.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (.f64 lambda1 (-.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 phi1 phi2) (-.f64 phi1 phi2))) (.f64 lambda2 (pow.f64 (-.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)))) #s(literal 2 binary64)))) (/.f64 (.f64 (-.f64 phi1 phi2) (-.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))))))) lambda2)) (.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) lambda1)) lambda2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))
(+ (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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(+ (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) (pow (- lambda1 lambda2) 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 phi2 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 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))) #s(literal -1/4 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 (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 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))
(+ (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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (.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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (.f64 phi2 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 #s(literal 1 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))) #s(literal -1/4 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 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))) (.f64 phi2 (.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)))) #s(literal 1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.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 #s(literal 1 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))) #s(literal -1/4 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 (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 phi1) (.f64 (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi1 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 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2) (pow phi2 2))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (/.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi2 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (.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 (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) phi2)) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (/ (* phi1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi2)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 phi1 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) phi2) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) phi2)) phi2)))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 phi1 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 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) (pow (- lambda1 lambda2) 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(+ (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) (pow (- lambda1 lambda2) 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)) (pow (- lambda1 lambda2) 2)))) (* 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) (pow (- lambda1 lambda2) 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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (.f64 phi1 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (.f64 phi1 (.f64 (+.f64 (.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/6 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 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) phi2)) #s(literal 2 binary64)))))) (.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (.f64 phi2 #s(literal -2 binary64)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (.f64 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.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 phi2 phi2) (.f64 (.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))
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 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) (pow phi1 3))) (* 1/2 (/ (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (.f64 phi1 (.f64 phi1 phi1))) (/.f64 (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #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 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) phi1)) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (/ (* phi2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))) 2)) phi1)) (* 1/2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (* (cos (* 1/2 phi2)) (- 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 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) phi1) (pow.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)))) phi1)) phi1)))
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* R phi1)
(*.f64 phi1 R)
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 R))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R lambda1)
(*.f64 lambda1 R)
(+ (* -1/8 (* R (* lambda1 (pow phi2 2)))) (* R lambda1))
(+.f64 (.f64 lambda1 R) (.f64 #s(literal -1/8 binary64) (.f64 R (.f64 lambda1 (*.f64 phi2 phi2)))))
(+ (* R lambda1) (* (pow phi2 2) (+ (* -1/8 (* R lambda1)) (* 1/384 (* R (* lambda1 (pow phi2 2)))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 R (.f64 lambda1 (*.f64 phi2 phi2))) #s(literal 1/384 binary64)))))
(+ (* R lambda1) (* (pow phi2 2) (+ (* -1/8 (* R lambda1)) (* (pow phi2 2) (+ (* -1/46080 (* R (* lambda1 (pow phi2 2)))) (* 1/384 (* R lambda1)))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
lambda1
(+ lambda1 (* -1/8 (* lambda1 (pow phi2 2))))
(+.f64 lambda1 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 (*.f64 phi2 phi2))))
(+ lambda1 (* (pow phi2 2) (+ (* -1/8 lambda1) (* 1/384 (* lambda1 (pow phi2 2))))))
(+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal 1/384 binary64)))))
(+ lambda1 (* (pow phi2 2) (+ (* -1/8 lambda1) (* (pow phi2 2) (+ (* -1/46080 (* lambda1 (pow phi2 2))) (* 1/384 lambda1))))))
(+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (*.f64 lambda1 #s(literal 1/384 binary64)))))))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi2 2)))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2)))
(+ 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)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* 1/8 phi1)
(*.f64 phi1 #s(literal 1/8 binary64))
(+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))
(.f64 #s(literal 1/8 binary64) (+.f64 phi1 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1))))
(+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))
(.f64 #s(literal 1/8 binary64) (+.f64 phi1 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1))))
(+ (* 1/8 phi1) (* 1/8 (/ (pow phi2 3) (pow phi1 2))))
(.f64 #s(literal 1/8 binary64) (+.f64 phi1 (/.f64 (.f64 phi2 (.f64 phi2 phi2)) (.f64 phi1 phi1))))
(* 1/8 (/ (pow phi2 3) (pow phi1 2)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1))
(* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))
(.f64 (.f64 phi2 (.f64 phi2 phi2)) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 phi1 (.f64 phi2 (.f64 phi2 phi2)))) (/.f64 #s(literal 1/8 binary64) (*.f64 phi1 phi1))))
(* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))
(.f64 (.f64 phi2 (.f64 phi2 phi2)) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 phi1 (.f64 phi2 (.f64 phi2 phi2)))) (/.f64 #s(literal 1/8 binary64) (*.f64 phi1 phi1))))
(* (pow phi2 3) (+ (* 1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2)))))
(.f64 (.f64 phi2 (.f64 phi2 phi2)) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 phi1 (.f64 phi2 (.f64 phi2 phi2)))) (/.f64 #s(literal 1/8 binary64) (*.f64 phi1 phi1))))
(* 1/8 (/ (pow phi2 3) (pow phi1 2)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1))
(* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))
(.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) phi1) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 #s(literal -1/8 binary64) (.f64 phi1 phi1))) (.f64 #s(literal -1 binary64) (.f64 phi2 (.f64 phi2 phi2))))
(* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))
(.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) phi1) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 #s(literal -1/8 binary64) (.f64 phi1 phi1))) (.f64 #s(literal -1 binary64) (.f64 phi2 (.f64 phi2 phi2))))
(* -1 (* (pow phi2 3) (- (* -1/8 (/ phi1 (pow phi2 3))) (* 1/8 (/ 1 (pow phi1 2))))))
(.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) phi1) (.f64 phi2 (.f64 phi2 phi2))) (/.f64 #s(literal -1/8 binary64) (.f64 phi1 phi1))) (.f64 #s(literal -1 binary64) (.f64 phi2 (.f64 phi2 phi2))))
(* 1/8 (/ (pow phi2 3) (pow phi1 2)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1))
(/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))
(/.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) (.f64 phi1 phi1))
(/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))
(/.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) (.f64 phi1 phi1))
(/ (+ (* 1/8 (pow phi1 3)) (* 1/8 (pow phi2 3))) (pow phi1 2))
(/.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (.f64 phi1 (.f64 phi1 phi1)) (.f64 phi2 (.f64 phi2 phi2)))) (.f64 phi1 phi1))
(* 1/8 phi1)
(*.f64 phi1 #s(literal 1/8 binary64))
(* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))
(.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))
(* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))
(.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))
(* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3)))))
(.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1)))))
(* 1/8 phi1)
(*.f64 phi1 #s(literal 1/8 binary64))
(* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) #s(literal -1/8 binary64)))
(* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) #s(literal -1/8 binary64)))
(* -1 (* phi1 (- (* -1/8 (/ (pow phi2 3) (pow phi1 3))) 1/8)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))) #s(literal -1/8 binary64)))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 lambda1 R) (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 lambda1 R) (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 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 R) (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 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 R) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 #s(literal 1/48 binary64) R) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1)))))
(* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1)))))
(* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1)))))
(* R (* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1)))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (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 lambda1 R) (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 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 R) (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 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 R) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 R) (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 (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* R (* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))))
(.f64 (.f64 lambda1 R) (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1)))))
(* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1)))))
(* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1)))))
(* lambda1 (cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1)))))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1)))))))
(* lambda1 (cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1))))))
(.f64 lambda1 (cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) phi2) phi1) #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/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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(+ (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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1))))
(cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1))))
(cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1))))
(cos (/ (* phi1 (- 1/8 (* -1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* -1/2 (/ (* phi2 (+ 1/2 (* -1/2 (/ phi2 phi1)))) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 phi2 phi1))))) phi1))))
(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 phi1 #s(literal -1/2 binary64)) (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 #s(literal -1/8 binary64) phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 #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 (.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(cos (/ (* phi1 (+ 1/8 (* 1/8 (/ (pow phi2 3) (pow phi1 3))))) (+ 1/4 (* 1/2 (/ (* phi2 (- (* 1/2 (/ phi2 phi1)) 1/2)) phi1)))))
(cos.f64 (/.f64 (.f64 phi1 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (.f64 phi1 phi1))))) (+.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1/2 binary64) (.f64 phi2 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)) phi1))))))
(* 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 (.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(-.f64 #s(literal 0 binary64) (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal -1/2 binary64)) phi2) #s(literal -1/2 binary64))))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(-.f64 #s(literal 0 binary64) (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal -1/2 binary64)) phi2) #s(literal -1/2 binary64))))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(-.f64 #s(literal 0 binary64) (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal -1/2 binary64)) phi2) #s(literal -1/2 binary64))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(.f64 (.f64 lambda1 R) (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 lambda1 R) (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 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 R) (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 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 R) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (.f64 phi1 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 R) (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 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(.f64 (.f64 lambda1 R) (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 lambda1 R) (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 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 R) (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 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 R) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 phi2 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 R) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.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 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(+ (* -1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* -1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* lambda1 (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi2)))) (* 1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) lambda1) (.f64 phi1 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 phi1 (+.f64 (.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 phi1)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(+ (* -1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* -1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 lambda1 phi2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* lambda1 (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* lambda1 (cos (* 1/2 phi1)))) (* 1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))))))
(+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) lambda1) (.f64 phi2 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) lambda1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 phi2 (+.f64 (.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 #s(literal 1/48 binary64) (.f64 (.f64 lambda1 phi2) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(.f64 lambda1 (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 phi1 #s(literal -1/2 binary64)) (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 #s(literal -1/8 binary64) phi1) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) 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 #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 (.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(+ (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 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(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 (sin (* 1/2 phi1))))
(.f64 (.f64 #s(literal 1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))
(.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 #s(literal -1/48 binary64) (.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))
(.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (.f64 (.f64 #s(literal 1/3840 binary64) (.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))
(.f64 phi2 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 #s(literal -1/645120 binary64) (.f64 phi2 phi2)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/3840 binary64))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* 1/2 (* phi1 (sin (* 1/2 phi2))))
(.f64 (.f64 #s(literal 1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))
(.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 #s(literal -1/48 binary64) (.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))
(.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (.f64 (.f64 #s(literal 1/3840 binary64) (.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))
(.f64 phi1 (+.f64 (.f64 #s(literal 1/2 binary64) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 #s(literal -1/645120 binary64) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 phi1 phi1))) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1/3840 binary64))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/46080 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 phi2 phi2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/384 binary64)))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (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)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 1/384 binary64) (.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))
(+.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (.f64 (.f64 phi1 phi1) (+.f64 (.f64 (.f64 #s(literal -1/46080 binary64) (.f64 phi1 phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1/384 binary64)))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* 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 (.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* phi2 (- (+ 1/2 (* -1 (/ (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2))) (pow phi2 2)))) (* -1/2 (/ phi1 phi2))))
(.f64 phi2 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 phi2 phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) phi1) phi2)))
(* phi2 (- (+ 1/2 (* -1 (/ (* phi1 (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) (pow phi2 3)))) (+ (* -1/2 (/ phi1 phi2)) (+ (* -1/2 (/ (pow phi1 2) (pow phi2 2))) (* 1/2 (/ (pow phi1 2) (pow phi2 2)))))))
(.f64 phi2 (+.f64 (-.f64 #s(literal 1/2 binary64) (.f64 phi1 (/.f64 #s(literal 0 binary64) (.f64 phi2 (.f64 phi2 phi2))))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi1) phi2) #s(literal 0 binary64))))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(-.f64 #s(literal 0 binary64) (.f64 phi2 (+.f64 (/.f64 (.f64 phi1 #s(literal -1/2 binary64)) phi2) #s(literal -1/2 binary64))))
(* -1 (* phi2 (- (* -1 (/ (- (+ (* -1/2 (/ (pow phi1 2) phi2)) (* 1/2 (/ (pow phi1 2) phi2))) (* -1/2 phi1)) phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) phi1) phi2)) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (* phi1 (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) phi2)) (+ (* -1/2 (pow phi1 2)) (* 1/2 (pow phi1 2)))) phi2)) (* -1/2 phi1)) phi2)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (+.f64 (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 phi1 (/.f64 #s(literal 0 binary64) phi2))) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) phi2)) (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) phi2)) #s(literal -1/2 binary64)))
(* 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 (/ (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2))) (pow phi1 2)))) (* -1/2 (/ phi2 phi1))))
(.f64 phi1 (+.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 0 binary64) (.f64 phi1 phi1))) (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1)))
(* phi1 (- (+ 1/2 (* -1 (/ (* phi2 (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2)))) (pow phi1 3)))) (+ (* -1/2 (/ phi2 phi1)) (+ (* -1/2 (/ (pow phi2 2) (pow phi1 2))) (* 1/2 (/ (pow phi2 2) (pow phi1 2)))))))
(.f64 phi1 (+.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 (.f64 phi2 #s(literal 0 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) phi2) phi1) #s(literal 0 binary64))))
(* 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 (/ (+ (* -1 (/ (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2))) phi1)) (* 1/2 phi2)) phi1)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) phi2) (/.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) phi1)) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (pow phi2 2)) (+ (* 1/2 (pow phi2 2)) (/ (* phi2 (+ (* -1/2 (pow phi2 2)) (* 1/2 (pow phi2 2)))) phi1))) phi1)) (* 1/2 phi2)) phi1)) 1/2)))
(.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) phi2) (/.f64 (+.f64 #s(literal 0 binary64) (*.f64 phi2 (/.f64 #s(literal 0 binary64) phi1))) phi1)) (-.f64 #s(literal 0 binary64) phi1)) #s(literal -1/2 binary64)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))
(* 1/8 (/ (pow phi2 3) (pow phi1 3)))
(/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 (*.f64 phi1 phi1)))

eval202.0ms (1.1%)

Compiler: Compiled 34301 to 2716 computations (92.1% saved)

prune193.0ms (1%)

Pruning

56 alts after pruning (52 fresh and 4 done)

	Pruned	Kept	Total
New	947	17	964
Fresh	8	35	43
Picked	3	2	5
Done	0	2	2
Total	958	56	1014

Accuracy

100.0%

Counts

1014 → 56

Alt Table

Click to see full alt table

Status	Accuracy	Program
	7.7%	(/.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (.f64 R (.f64 phi1 (.f64 R phi1))))
	14.5%	(/.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (.f64 R phi1))
	7.7%	(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
	19.2%	(-.f64 (.f64 (.f64 R lambda1) (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)))))
	52.1%	(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1))))
	9.5%	(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
	7.7%	(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
	14.1%	(.f64 (-.f64 #s(literal 0 binary64) (.f64 R (.f64 phi1 (.f64 R phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 R phi1)))
	8.4%	(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
	8.4%	(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	21.3%	(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
	14.1%	(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
	20.5%	(.f64 (.f64 R lambda2) (-.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)))))
	21.8%	(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
	13.9%	(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
	11.3%	(.f64 (neg.f64 (.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
	19.9%	(.f64 (neg.f64 (.f64 R lambda1)) (-.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)))))
	54.6%	(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
	25.6%	(.f64 lambda1 (-.f64 (.f64 R (-.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 (.f64 R lambda2) (-.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))))) lambda1)))
	3.1%	(*.f64 lambda1 R)
	97.3%	(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)))
	42.9%	(.f64 R (hypot.f64 (/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
	89.2%	(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 phi1 phi2)))
	88.3%	(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
	99.9%	(.f64 R (hypot.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
	99.8%	(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
	89.2%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
	94.0%	(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
	89.2%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
	88.4%	(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
	48.3%	(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
	14.2%	(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
	18.4%	(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
	16.2%	(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) lambda1))
	20.0%	(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
	8.8%	(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
	9.1%	(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
	10.3%	(.f64 R (.f64 (+.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)))) (-.f64 #s(literal 0 binary64) lambda2)))
	14.1%	(.f64 R (.f64 (+.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)))) lambda1))
	5.2%	(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
	13.9%	(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
	4.4%	(.f64 R (.f64 (cos.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) lambda1))
	2.7%	(.f64 R (.f64 (cos.f64 (/.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1)) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
	10.4%	(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
	15.8%	(.f64 R (.f64 (cos.f64 (.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) lambda2))
✓	12.4%	(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
	19.2%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
✓	8.4%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
	21.0%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
	11.2%	(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
	3.4%	(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
	3.3%	(.f64 R (.f64 (cos.f64 (exp.f64 (log.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) lambda1))
	54.9%	(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
	15.4%	(.f64 R (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
✓	29.4%	(*.f64 R phi2)
✓	32.3%	(neg.f64 (*.f64 R phi1))

Compiler

Compiled 2884 to 1178 computations (59.2% saved)

regimes313.0ms (1.7%)

Counts

89 → 1

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.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 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
(.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 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.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 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
(.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 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (/.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1)) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.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 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(.f64 R (.f64 (+.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)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 phi1 phi2)))
(.f64 R (.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))))
(-.f64 (.f64 (.f64 R lambda1) (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 R (.f64 (cos.f64 (.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) lambda2))
(.f64 R (.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)) (-.f64 #s(literal 0 binary64) lambda2)))
(.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 R (hypot.f64 (/.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 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (exp.f64 (log.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) lambda1))
(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1))
(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.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 (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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))))
(.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 R (.f64 (cos.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) lambda1))
(.f64 (.f64 R lambda2) (-.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 (neg.f64 (.f64 R lambda1)) (-.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 (neg.f64 (.f64 R lambda2)) (-.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 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
(.f64 lambda1 (-.f64 (.f64 R (-.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 (.f64 R lambda2) (-.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))))) lambda1)))

Outputs

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

Calls

9 calls:

43.0ms	lambda1
43.0ms	(-.f64 lambda1 lambda2)
40.0ms	(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))))
37.0ms	R
29.0ms	phi1

Results

Accuracy	Segments	Branch
99.9%	1	`R`
99.9%	1	`lambda1`
99.9%	1	`lambda2`
99.9%	1	`phi1`
99.9%	1	`phi2`
99.9%	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)))))`
99.9%	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))))`
99.9%	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)))`
99.9%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 144 to 79 computations (45.1% saved)

regimes346.0ms (1.8%)

Counts

87 → 1

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.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 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
(.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 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.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 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
(.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 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (/.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1)) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.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 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(.f64 R (.f64 (+.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)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 phi1 phi2)))
(.f64 R (.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))))
(-.f64 (.f64 (.f64 R lambda1) (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 R (.f64 (cos.f64 (.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) lambda2))
(.f64 R (.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)) (-.f64 #s(literal 0 binary64) lambda2)))
(.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 R (hypot.f64 (/.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 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (exp.f64 (log.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) lambda1))
(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1))
(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.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 (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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))))
(.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 R (.f64 (cos.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) lambda1))
(.f64 (.f64 R lambda2) (-.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 (neg.f64 (.f64 R lambda1)) (-.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 (neg.f64 (.f64 R lambda2)) (-.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 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (+.f64 (.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 lambda2 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (fma.f64 (cos.f64 (.f64 phi1 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (.f64 (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))

Outputs

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

Calls

9 calls:

57.0ms	phi2
55.0ms	(-.f64 lambda1 lambda2)
47.0ms	(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))))
34.0ms	lambda1
32.0ms	phi1

Results

Accuracy	Segments	Branch
99.9%	1	`R`
99.9%	1	`lambda1`
99.9%	1	`lambda2`
99.9%	1	`phi1`
99.9%	1	`phi2`
99.9%	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)))))`
99.9%	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))))`
99.9%	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)))`
99.9%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 144 to 79 computations (45.1% saved)

regimes281.0ms (1.5%)

Counts

81 → 1

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.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 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
(.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 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.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 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
(.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 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (/.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1)) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.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 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(.f64 R (.f64 (+.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)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 phi1 phi2)))
(.f64 R (.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))))
(-.f64 (.f64 (.f64 R lambda1) (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 R (.f64 (cos.f64 (.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) lambda2))
(.f64 R (.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)) (-.f64 #s(literal 0 binary64) lambda2)))
(.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 R (hypot.f64 (/.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 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (exp.f64 (log.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) lambda1))
(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1))
(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.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 (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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))))
(.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 R (.f64 (cos.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) lambda1))
(.f64 (.f64 R lambda2) (-.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 (neg.f64 (.f64 R lambda1)) (-.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 (neg.f64 (.f64 R lambda2)) (-.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 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (-.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))

Outputs

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

Calls

9 calls:

44.0ms	phi1
43.0ms	lambda1
36.0ms	(-.f64 lambda1 lambda2)
33.0ms	lambda2
28.0ms	R

Results

Accuracy	Segments	Branch
99.8%	1	`R`
99.8%	1	`lambda1`
99.8%	1	`lambda2`
99.8%	1	`phi1`
99.8%	1	`phi2`
99.8%	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)))))`
99.8%	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))))`
99.8%	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)))`
99.8%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 144 to 79 computations (45.1% saved)

regimes258.0ms (1.4%)

Counts

79 → 1

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.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 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
(.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 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.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 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
(.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 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (/.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1)) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.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 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
(.f64 (neg.f64 (.f64 R lambda2)) (-.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(.f64 R (.f64 (+.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)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 phi1 phi2)))
(.f64 R (.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))))
(-.f64 (.f64 (.f64 R lambda1) (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 R (.f64 (cos.f64 (.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))) lambda2))
(.f64 R (.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)) (-.f64 #s(literal 0 binary64) lambda2)))
(.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 R (hypot.f64 (/.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 phi1 phi2)))
(.f64 R (hypot.f64 (/.f64 (.f64 (-.f64 (.f64 lambda1 (.f64 lambda1 lambda1)) (.f64 lambda2 (.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (+.f64 (.f64 lambda1 lambda1) (.f64 lambda2 (+.f64 lambda1 lambda2)))) (-.f64 phi1 phi2)))
(.f64 R (.f64 (cos.f64 (exp.f64 (log.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))) lambda1))
(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) lambda1))
(.f64 R (.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.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 (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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64))))
(.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 R (.f64 (cos.f64 (pow.f64 (exp.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 lambda2 (-.f64 (.f64 (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (.f64 #s(literal 1/2 binary64) phi2))) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (.f64 #s(literal 1/2 binary64) phi2))))))
(.f64 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) lambda1))
(.f64 (.f64 R lambda2) (-.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 (neg.f64 (.f64 R lambda1)) (-.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 (neg.f64 (.f64 R lambda2)) (-.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 R (.f64 (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64))))) (-.f64 #s(literal 0 binary64) lambda2)))

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:

54.0ms	phi2
32.0ms	lambda1
24.0ms	phi1
23.0ms	lambda2
23.0ms	(-.f64 lambda1 lambda2)

Results

Accuracy	Segments	Branch
94.0%	1	`R`
94.0%	1	`lambda1`
94.0%	1	`lambda2`
94.0%	1	`phi1`
94.0%	1	`phi2`
94.0%	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)))))`
94.0%	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))))`
94.0%	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)))`
94.0%	1	`(-.f64 lambda1 lambda2)`

Compiler

Compiled 144 to 79 computations (45.1% saved)

regimes91.0ms (0.5%)

Counts

48 → 2

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.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 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
(.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 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.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 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
(.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 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (/.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1)) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.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:

15.0ms	lambda2
15.0ms	lambda1
15.0ms	R
14.0ms	(-.f64 lambda1 lambda2)
14.0ms	phi1

Results

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

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes121.0ms (0.6%)

Counts

47 → 1

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.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 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
(.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 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.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 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
(.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 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (/.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1)) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.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

6 calls:

31.0ms	phi1
28.0ms	(-.f64 lambda1 lambda2)
14.0ms	lambda2
14.0ms	phi2
13.0ms	lambda1

Results

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

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes109.0ms (0.6%)

Counts

46 → 2

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.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 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 lambda1 R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(.f64 (.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) R) lambda1)
(.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 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(.f64 R (.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(.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 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda1)
(.f64 (.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) lambda2)
(.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 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(.f64 R (.f64 (cos.f64 (.f64 phi1 (+.f64 #s(literal 1/2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (/.f64 (.f64 (cos.f64 (.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda2 lambda1)) lambda2) (-.f64 #s(literal 0 binary64) lambda2)))
(.f64 R (.f64 (cos.f64 (/.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 phi2 (.f64 phi2 phi2))) (.f64 phi1 phi1)) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))
(.f64 R (.f64 (cos.f64 (/.f64 (.f64 (+.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (.f64 phi2 (.f64 phi2 phi2)) #s(literal 1/8 binary64)) (.f64 phi1 (.f64 phi1 phi1)))) phi1) (+.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 phi2 #s(literal 1/2 binary64)) phi1) (-.f64 (/.f64 (*.f64 phi2 #s(literal 1/2 binary64)) phi1) #s(literal 1/2 binary64)))))) lambda1))

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

Calls

6 calls:

32.0ms	phi2
19.0ms	lambda2
14.0ms	lambda1
13.0ms	(-.f64 lambda1 lambda2)
13.0ms	R

Results

Accuracy	Segments	Branch
58.4%	3	`(-.f64 lambda1 lambda2)`
60.5%	2	`lambda2`
59.1%	3	`phi1`
62.5%	4	`phi2`
58.7%	3	`R`
61.5%	4	`lambda1`

Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes10.0ms (0.1%)

Counts

23 → 2

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.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 (.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))

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

Calls

1 calls:

7.0ms

lambda2

Results

Accuracy	Segments	Branch
59.6%	2	`lambda2`

Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes26.0ms (0.1%)

Counts

20 → 2

Calls

Call 1

Inputs
(*.f64 R phi2)
(*.f64 lambda1 R)
(neg.f64 (*.f64 R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2)))
(.f64 phi2 (-.f64 R (/.f64 (.f64 phi1 R) phi2)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/8 binary64) (.f64 phi2 phi2))) lambda1))
(.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) 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 1 binary64) (*.f64 R phi1)))
(.f64 R (.f64 (+.f64 #s(literal 1 binary64) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) lambda1))
(/.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 R (.f64 (+.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)))) lambda1))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1))))) (/.f64 #s(literal 1 binary64) (.f64 R (.f64 phi1 (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 R (.f64 phi1 (.f64 R phi1))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 R phi1) (.f64 R (.f64 phi1 (.f64 R phi1)))))))
(.f64 R (+.f64 lambda1 (.f64 (.f64 phi2 phi2) (+.f64 (.f64 lambda1 #s(literal -1/8 binary64)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 lambda1 (.f64 phi2 phi2)) #s(literal -1/46080 binary64)) (.f64 lambda1 #s(literal 1/384 binary64))))))))
(+.f64 (.f64 lambda1 R) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 lambda1 R)) (.f64 (.f64 phi2 phi2) (+.f64 (.f64 (.f64 R (.f64 lambda1 (.f64 phi2 phi2))) #s(literal -1/46080 binary64)) (.f64 (*.f64 lambda1 R) #s(literal 1/384 binary64)))))))
(.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))

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

Calls

3 calls:

12.0ms	phi2
6.0ms	lambda2
6.0ms	lambda1

Results

Accuracy	Segments	Branch
54.9%	1	`lambda1`
57.6%	2	`phi2`
57.2%	2	`lambda2`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes25.0ms (0.1%)

Counts

9 → 2

Calls

Call 1

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

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

Calls

2 calls:

20.0ms	phi1
4.0ms	phi2

Results

Accuracy	Segments	Branch
57.3%	2	`phi1`
56.9%	2	`phi2`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes7.0ms (0%)

Counts

8 → 2

Calls

Call 1

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

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

Calls

2 calls:

3.0ms	phi1
3.0ms	lambda2

Results

Accuracy	Segments	Branch
57.2%	2	`lambda2`
54.9%	1	`phi1`

Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes8.0ms (0%)

Counts

5 → 2

Calls

Call 1

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

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

Calls

3 calls:

2.0ms	phi2
2.0ms	R
2.0ms	lambda2

Results

Accuracy	Segments	Branch
56.7%	2	`phi2`
54.9%	1	`R`
54.9%	1	`lambda2`

Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes12.0ms (0.1%)

Counts

4 → 2

Calls

Call 1

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

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

Calls

5 calls:

3.0ms	phi2
2.0ms	R
2.0ms	lambda1
2.0ms	lambda2
2.0ms	phi1

Results

Accuracy	Segments	Branch
37.3%	3	`R`
52.0%	2	`phi1`
36.8%	3	`lambda1`
36.2%	3	`lambda2`
51.2%	2	`phi2`

Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes9.0ms (0%)

Accuracy

Total -17.3b remaining (-38.2%)

Threshold costs -17.3b (-38.2%)

Counts

2 → 1

Calls

Call 1

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

Outputs
(*.f64 R phi2)

Calls

5 calls:

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

Results

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

Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch17.0ms (0.1%)

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
15.0ms	4.039520717017652e-60	3.2092616320500066e-59

Results

8.0ms	67×	0	valid
4.0ms	13×	1	valid

Compiler

Compiled 245 to 164 computations (33.1% saved)

Precisions

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

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

bsearch40.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
37.0ms	6.734042572182395e+154	2.5696286365255658e+160

Results

20.0ms	65×	1	valid
10.0ms	79×	0	valid

Compiler

Compiled 306 to 222 computations (27.5% saved)

Precisions

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

ival-mult: 6.0ms (29.2% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch30.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
28.0ms	2.5696286365255658e+160	8.338318839144514e+161

Results

12.0ms	39×	1	valid
12.0ms	73×	0	valid

Compiler

Compiled 248 to 178 computations (28.2% saved)

Precisions

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

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

ival-cos: 3.0ms (20.6% of total)

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch35.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
33.0ms	81576199788.55225	29321546154206.17

Results

19.0ms	18×	1	valid
11.0ms	78×	0	valid

Compiler

Compiled 237 to 162 computations (31.6% saved)

Precisions

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

ival-cos: 16.0ms (65.6% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch58.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	predicate-same

Steps

Time	Left	Right
55.0ms	-5.075673587442797e+29	-3.670429373366058e+26

Results

35.0ms	47×	1	valid
17.0ms	65×	0	valid

Compiler

Compiled 269 to 192 computations (28.6% saved)

Precisions

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

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

ival-sqrt: 9.0ms (20.5% of total)

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch23.0ms (0.1%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
16.0ms	425537608296487.4	949220617519128.3

Results

8.0ms	65×	0	valid
5.0ms	15×	1	valid

Compiler

Compiled 195 to 129 computations (33.8% saved)

Precisions

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

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

bsearch44.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
41.0ms	1.8035788547663672e-188	4.984201607078973e-185

Results

25.0ms	30×	1	valid
12.0ms	98×	0	valid

Compiler

Compiled 245 to 176 computations (28.2% saved)

Precisions

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

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

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

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

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

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

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

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

const: 0.0ms (0% of total)

bsearch68.0ms (0.4%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
46.0ms	-3.042580223891757e-36	-3.328687611381697e-40

Results

34.0ms	103×	0	valid
8.0ms	25×	1	valid

Compiler

Compiled 197 to 144 computations (26.9% saved)

Precisions

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

ival-mult: 26.0ms (74.6% of total)

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

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

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

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

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

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

const: 0.0ms (0% of total)

simplify85.0ms (0.5%)

Algorithm

1×	egg-herbie

Rules

606×	`distribute-lft-neg-in_binary64`
422×	`neg-mul-1_binary64`
318×	`neg-sub0_binary64`
268×	`cancel-sign-sub_binary64`
238×	`distribute-rgt-neg-in_binary64`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	101	302
1	185	302
2	261	302
3	321	299
4	402	299
5	503	299
6	705	299
7	990	299
8	1178	299
9	1382	299
10	1568	299
11	1695	299
12	1777	299
13	1840	299
14	1898	299
15	1942	299
16	1957	299
17	1960	299

Stop Event

1×

saturated

Calls

Call 1

Inputs
(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 phi1 phi2)))
(.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 1696173182187249/56539106072908298546665520023773392506479484700019806659891398441363832832 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 6400000000000000045927881861825077146115934796106259955629617417360042347551253768209062847012876117144740724050992776720645218190686030460974953835335254016 binary64)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(if (<=.f64 lambda2 #s(literal 210000000000000002931839901622323692628388100023194762361724806788416322764180283805402957119649017812296243405676677068982218031322725585203863361303346562465792 binary64)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) (.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2)))
(if (<=.f64 phi2 #s(literal 3000000000000 binary64)) (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1)))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 phi1 #s(literal -400000000000000019058917376 binary64)) (.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 lambda2 #s(literal 560000000000000 binary64)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) (.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2))))
(if (<=.f64 phi2 #s(literal 937676883680507/19136262932255243894327540630475154705164967900866663911068029494595001430924024396931296128159696131577158553613765316960850876967683885097823130383956161858642094270647956721192399556036699204091904 binary64)) (neg.f64 (.f64 R phi1)) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 phi1 #s(literal -2244866514940267/748288838313422294120286634350736906063837462003712 binary64)) (neg.f64 (.f64 R phi1)) (.f64 R phi2))
(*.f64 R phi2)

Outputs
(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 0 binary64) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (fma.f64 (-.f64 lambda1 lambda2) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda2 lambda1))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (-.f64 (.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (.f64 phi2 #s(literal 1/2 binary64)))) (.f64 (-.f64 lambda1 lambda2) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (+.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (.f64 (-.f64 lambda1 lambda2) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1)))) (.f64 (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda2 lambda1))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 phi1 #s(literal 1/2 binary64)))) (.f64 (sin.f64 (.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (.f64 phi1 #s(literal 1/2 binary64)))))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (/.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2))) (-.f64 (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (.f64 #s(literal 1/2 binary64) phi1))) (.f64 (sin.f64 (.f64 phi2 #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) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(.f64 R (hypot.f64 (.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 1696173182187249/56539106072908298546665520023773392506479484700019806659891398441363832832 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 1696173182187249/56539106072908298546665520023773392506479484700019806659891398441363832832 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 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)))
(if (<=.f64 lambda2 #s(literal 6400000000000000045927881861825077146115934796106259955629617417360042347551253768209062847012876117144740724050992776720645218190686030460974953835335254016 binary64)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) (.f64 (.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(if (<=.f64 lambda2 #s(literal 6400000000000000045927881861825077146115934796106259955629617417360042347551253768209062847012876117144740724050992776720645218190686030460974953835335254016 binary64)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) (.f64 (cos.f64 (.f64 phi2 #s(literal 1/2 binary64))) (*.f64 R lambda2)))
(if (<=.f64 lambda2 #s(literal 210000000000000002931839901622323692628388100023194762361724806788416322764180283805402957119649017812296243405676677068982218031322725585203863361303346562465792 binary64)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) (.f64 R (.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2)))
(if (<=.f64 lambda2 #s(literal 210000000000000002931839901622323692628388100023194762361724806788416322764180283805402957119649017812296243405676677068982218031322725585203863361303346562465792 binary64)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) (.f64 R (.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 phi2 #s(literal 3000000000000 binary64)) (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 R (/.f64 (.f64 R phi2) phi1)))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 phi2 #s(literal 3000000000000 binary64)) (.f64 phi1 (-.f64 (/.f64 (.f64 R phi2) phi1) R)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 phi1 #s(literal -400000000000000019058917376 binary64)) (.f64 R (-.f64 #s(literal 0 binary64) (.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 phi1 #s(literal -400000000000000019058917376 binary64)) (.f64 R (.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 lambda2 #s(literal 560000000000000 binary64)) (.f64 R (.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))) (.f64 phi2 (-.f64 R (/.f64 (.f64 R phi1) phi2))))
(if (<=.f64 phi2 #s(literal 937676883680507/19136262932255243894327540630475154705164967900866663911068029494595001430924024396931296128159696131577158553613765316960850876967683885097823130383956161858642094270647956721192399556036699204091904 binary64)) (neg.f64 (.f64 R phi1)) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 phi2 #s(literal 937676883680507/19136262932255243894327540630475154705164967900866663911068029494595001430924024396931296128159696131577158553613765316960850876967683885097823130383956161858642094270647956721192399556036699204091904 binary64)) (.f64 R (-.f64 #s(literal 0 binary64) phi1)) (.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 phi1 #s(literal -2244866514940267/748288838313422294120286634350736906063837462003712 binary64)) (neg.f64 (.f64 R phi1)) (.f64 R phi2))
(if (<=.f64 phi1 #s(literal -2244866514940267/748288838313422294120286634350736906063837462003712 binary64)) (.f64 R (-.f64 #s(literal 0 binary64) phi1)) (.f64 R phi2))
(*.f64 R phi2)

soundness3.0s (16%)

Rules

7436×	`-lowering-.f32`
7436×	`-lowering-.f64`
7318×	`-lowering-.f32`
7318×	`-lowering-.f64`
4008×	`-lowering-.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	60	326
1	294	263
2	2622	256
0	8231	256
0	34	170
1	191	170
2	1600	167
0	8879	167
0	1567	21789
1	5583	20234
0	8118	20234
0	745	6936
1	2615	5722
0	8498	5722
0	50	268
1	284	192
2	2547	192
0	8268	192
0	17	49
1	90	49
2	777	49
0	8467	49
0	17	16
1	36	16
2	87	16
3	322	16
4	1528	16
5	5106	16
0	8103	16

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
1×	iter limit
1×	node limit

Compiler

Compiled 1269 to 751 computations (40.8% saved)

preprocess144.0ms (0.8%)

Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 1796 to 850 computations (52.7% saved)

analyze937.0ms (5%)

sample3.1s (16.4%)

preprocess258.0ms (1.4%)

explain384.0ms (2%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify216.0ms (1.1%)

localize149.0ms (0.8%)

series83.0ms (0.4%)

rewrite368.0ms (2%)

simplify457.0ms (2.4%)

eval55.0ms (0.3%)

prune89.0ms (0.5%)

simplify221.0ms (1.2%)

localize558.0ms (3%)

series197.0ms (1.1%)

rewrite444.0ms (2.4%)

simplify562.0ms (3%)

eval285.0ms (1.5%)

prune246.0ms (1.3%)

simplify242.0ms (1.3%)

localize638.0ms (3.4%)

series174.0ms (0.9%)

rewrite377.0ms (2%)

simplify509.0ms (2.7%)

eval300.0ms (1.6%)

prune245.0ms (1.3%)

simplify240.0ms (1.3%)

localize591.0ms (3.1%)

series178.0ms (0.9%)

rewrite388.0ms (2.1%)

simplify748.0ms (4%)

eval202.0ms (1.1%)

prune193.0ms (1%)

regimes313.0ms (1.7%)

regimes346.0ms (1.8%)

regimes281.0ms (1.5%)

regimes258.0ms (1.4%)

regimes91.0ms (0.5%)

regimes121.0ms (0.6%)

regimes109.0ms (0.6%)

regimes10.0ms (0.1%)

regimes26.0ms (0.1%)

regimes25.0ms (0.1%)

regimes7.0ms (0%)

regimes8.0ms (0%)

regimes12.0ms (0.1%)

regimes9.0ms (0%)

bsearch17.0ms (0.1%)

bsearch40.0ms (0.2%)

bsearch30.0ms (0.2%)

bsearch35.0ms (0.2%)

bsearch58.0ms (0.3%)

bsearch23.0ms (0.1%)

bsearch44.0ms (0.2%)

bsearch68.0ms (0.4%)

simplify85.0ms (0.5%)

soundness3.0s (16%)

preprocess144.0ms (0.8%)

end0.0ms (0%)

Profiling