Equirectangular approximation to distance on a great circle

Time bar (total: 17.2s)

analyze815.0ms (4.7%)

Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
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: 385.0ms
ival-mult: 171.0ms (44.4% of total)
ival-div: 67.0ms (17.4% of total)
ival-add: 41.0ms (10.6% of total)
ival-sub: 40.0ms (10.4% of total)
ival-cos: 37.0ms (9.6% of total)
ival-sqrt: 25.0ms (6.5% of total)
const: 4.0ms (1% of total)
backward-pass: 1.0ms (0.3% of total)

sample2.4s (14%)

Results
1.0s6144×0valid
878.0ms2112×1valid
Precisions
Click to see histograms. Total time spent on operations: 1.3s
ival-mult: 508.0ms (37.9% of total)
ival-sub: 219.0ms (16.4% of total)
ival-cos: 188.0ms (14% of total)
ival-sqrt: 124.0ms (9.3% of total)
ival-add: 103.0ms (7.7% of total)
ival-div: 99.0ms (7.4% of total)
backward-pass: 85.0ms (6.3% of total)
const: 13.0ms (1% of total)
Bogosity

preprocess365.0ms (2.1%)

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)

IterNodesCost
0150349
1415347
21082343
35106341
01716
13616
28716
332216
4152816
5510616
0810316
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)

explain307.0ms (1.8%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1680-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))))
54139(1.4555549252906149e-152 -3418005.024709692 2.7545321812114188e+259 -12007698332.91404 -6.747147055853718e-242)0-(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
00-0-(-.f64 phi1 phi2)
00-0-(/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))
00-0-(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
00-0-#s(literal 2 binary64)
00-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)))))
00-0-phi1
00-0-lambda1
00-0-(*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))
00-0-R
00-0-(-.f64 lambda1 lambda2)
00-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)))
00-0-phi2
00-0-(+.f64 phi1 phi2)
00-0-lambda2
00-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
198.0ms360×1valid
27.0ms152×0valid
Compiler

Compiled 359 to 53 computations (85.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 138.0ms
ival-sub: 37.0ms (26.9% of total)
ival-add: 26.0ms (18.9% of total)
ival-mult: 26.0ms (18.9% of total)
ival-cos: 19.0ms (13.8% of total)
ival-sqrt: 12.0ms (8.7% of total)
backward-pass: 11.0ms (8% of total)
ival-div: 6.0ms (4.4% of total)
const: 1.0ms (0.7% of total)

eval0.0ms (0%)

Compiler

Compiled 21 to 14 computations (33.3% saved)

prune20.0ms (0.1%)

Alt Table
Click to see full alt table
StatusAccuracyProgram
▶97.4%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
▶57.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)))))
Compiler

Compiled 58 to 31 computations (46.6% saved)

simplify170.0ms (1%)

Algorithm
1×egg-herbie
Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(-.f64 lambda1 lambda2)
✓cost-diff0
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓cost-diff0
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
✓cost-diff0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
✓cost-diff0
(*.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)))))
✓cost-diff0
(+.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)))
✓cost-diff7360
(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))))
✓cost-diff7360
(*.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)))))
Rules
2168×+-lowering-+.f64
2168×+-lowering-+.f32
1824×unsub-neg
1560×*-lowering-*.f32
1560×*-lowering-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
017163
136163
287163
3322163
41528163
55106163
08103163
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) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))
(* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))))
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
(- lambda1 lambda2)
lambda1
lambda2
(cos (/ (+ phi1 phi2) 2))
(/ (+ phi1 phi2) 2)
(+ phi1 phi2)
phi1
phi2
2
(* (- phi1 phi2) (- phi1 phi2))
(- phi1 phi2)
(* 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))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(* (- 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) (- phi1 phi2))
(*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))
(- phi1 phi2)
(-.f64 phi1 phi2)
(* 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)

localize215.0ms (1.2%)

Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
✓accuracy99.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
✓accuracy99.8%
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓accuracy82.6%
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
✓accuracy99.8%
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
✓accuracy99.7%
(*.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)))))
✓accuracy82.6%
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
✓accuracy39.2%
(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))))
Results
149.0ms180×1valid
17.0ms76×0valid
Compiler

Compiled 227 to 20 computations (91.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 82.0ms
ival-mult: 22.0ms (26.8% of total)
compiled-spec: 14.0ms (17.1% of total)
ival-cos: 13.0ms (15.9% of total)
backward-pass: 8.0ms (9.8% of total)
ival-add: 6.0ms (7.3% of total)
ival-div: 6.0ms (7.3% of total)
ival-sqrt: 6.0ms (7.3% of total)
ival-sub: 5.0ms (6.1% of total)
const: 1.0ms (1.2% of total)

series91.0ms (0.5%)

Counts
9 → 408
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))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))>
#<alt (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))))>
#<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 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))>
#<alt (+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))>
#<alt (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))>
#<alt (+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))>
#<alt (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))>
#<alt (+ (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (* phi1 (+ (* -2 phi2) (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (* phi1 (+ (* -2 phi2) (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ 1 (+ (* 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/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2)))))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (pow phi1 2)>
#<alt (* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))>
#<alt (* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))>
#<alt (* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))>
#<alt (pow phi1 2)>
#<alt (* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))>
#<alt (* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))>
#<alt (* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))>
#<alt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))>
#<alt (+ (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (* phi2 (+ (* -2 phi1) (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (* phi2 (+ (* -2 phi1) (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ 1 (+ (* 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/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2)))))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (pow phi2 2)>
#<alt (* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))>
#<alt (* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))>
#<alt (* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))>
#<alt (pow phi2 2)>
#<alt (* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))>
#<alt (* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))>
#<alt (* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))>
#<alt (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))>
#<alt (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))>
#<alt (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))>
#<alt (* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))>
#<alt (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))>
#<alt (+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 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/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2)))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))>
#<alt (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))>
#<alt (+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 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/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2)))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))>
#<alt (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))>
#<alt (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 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 (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

102 calls:

TimeVariablePointExpression
13.0ms
R
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
7.0ms
phi1
@0
(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
lambda2
@-inf
(+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))
3.0ms
phi2
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))

rewrite413.0ms (2.4%)

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)

IterNodesCost
017106
190106
2777106
08467106
Stop Event
1×iter limit
1×node limit
Counts
9 → 254
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)))) (* (- phi1 phi2) (- phi1 phi2)))
(* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))))
(* 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 (-.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 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 (/.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 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)))) (neg.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 phi1 phi2) (-.f64 phi1 phi2))))))
(+.f64 (*.f64 (-.f64 phi1 phi2) phi1) (+.f64 (neg.f64 (*.f64 (-.f64 phi1 phi2) 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 (*.f64 phi1 (-.f64 phi1 phi2)) (+.f64 (*.f64 phi2 (-.f64 phi2 phi1)) (*.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 (-.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) phi1)) (neg.f64 (*.f64 (-.f64 phi1 phi2) phi2)))
(+.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 phi1 (-.f64 phi1 phi2))) (*.f64 phi2 (-.f64 phi2 phi1)))
(-.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 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 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 phi1 phi2) (-.f64 phi1 phi2)))))
(-.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.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 (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 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))))))
(fma.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)))
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.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)))
(fma.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))))
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.f64 (*.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 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(neg.f64 (/.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)))))) (-.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)))))))))
(neg.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 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (-.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))))))
(neg.f64 (/.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))))))) (+.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))))))))
(neg.f64 (/.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)))))) (-.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 (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 (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 (+.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 (*.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 #s(literal 1 binary64) (/.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 (+.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 (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) (/.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 binary64)))
(/.f64 #s(literal 1 binary64) (/.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 (*.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)))))
(/.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 (*.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) (neg.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 (-.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))))))) (-.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 (-.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))))))) (neg.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 (-.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)))))) (-.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 (-.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))) (-.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 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 phi1 phi2))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 phi1 phi2) (+.f64 phi1 phi2))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 phi1 phi2) (+.f64 phi1 phi2))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 phi1 phi2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 phi1 phi2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 phi1 phi2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 phi1 phi2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 phi1 phi2))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 phi1 phi2))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (+.f64 phi1 phi2) (+.f64 phi1 phi2))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 phi1 phi2) (+.f64 phi1 phi2))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 phi1 phi2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 phi1 phi2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 phi1 phi2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 phi1 phi2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 phi1 phi2)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 phi1 phi2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 phi1 phi2)) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 phi1 phi2)) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))) (*.f64 (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2)))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 phi1 phi2) (+.f64 phi1 phi2)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))) (*.f64 (*.f64 (+.f64 phi1 phi2) (+.f64 phi1 phi2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 phi1 phi2) (+.f64 phi1 phi2)) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 phi1 phi2) (+.f64 phi1 phi2)) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 phi1 phi2) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))) (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi1 phi2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 phi1 phi2) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))) (*.f64 (+.f64 phi1 phi2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi1 phi2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 lambda1 lambda2)))
(/.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 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 (-.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 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (*.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)))))
(/.f64 (neg.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)))))))) (neg.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 (neg.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))))))) (neg.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 (neg.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)))) (neg.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 (-.f64 (pow.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 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 3 binary64)) (pow.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 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 3 binary64))) (+.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 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 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 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 (*.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 phi1 phi2) (-.f64 phi1 phi2)))) (/.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 phi1 phi2) (-.f64 phi1 phi2))))) (*.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 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 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 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (-.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 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 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 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 (/.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 phi1 phi2) (-.f64 phi1 phi2)))) (/.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 phi1 phi2) (-.f64 phi1 phi2)))))) (+.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 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 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 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 binary64))
(*.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)))))) (/.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 (+.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) (+.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 #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 (-.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) (-.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 #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))))))) (/.f64 #s(literal 1 binary64) (-.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 (-.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)))))) (/.f64 #s(literal 1 binary64) (-.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 (-.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))) (/.f64 #s(literal 1 binary64) (-.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 (/.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) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1)) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (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 lambda1 (*.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 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))))
(+.f64 (*.f64 (*.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))) lambda1)) (*.f64 (*.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 #s(literal 0 binary64) lambda2))))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (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 lambda1 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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal 1/2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (*.f64 (-.f64 lambda1 lambda2) lambda1)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) lambda2))))
(+.f64 (*.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 (-.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 lambda2 (-.f64 lambda2 lambda1))))
(+.f64 (*.f64 (*.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)) lambda1) (*.f64 (*.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 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 (*.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 #s(literal 0 binary64) lambda2)) (*.f64 (*.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)) lambda1))
(+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) lambda1) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 lambda1 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(+.f64 (*.f64 (*.f64 lambda1 (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 (-.f64 #s(literal 0 binary64) 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 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))))
(+.f64 (*.f64 (*.f64 lambda1 (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))) (*.f64 (*.f64 lambda2 (-.f64 lambda2 lambda1)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))))
(+.f64 (*.f64 lambda1 (*.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 #s(literal 0 binary64) 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 #s(literal 0 binary64) 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 lambda1 (*.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))))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))))
(/.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))) (*.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 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 #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 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))) (-.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)) (*.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 #s(literal 0 binary64) (+.f64 lambda1 lambda2)))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.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))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) #s(literal 2 binary64))
(*.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 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(*.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (cos.f64 (/.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 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (exp.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))))
(*.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)))

simplify458.0ms (2.7%)

Algorithm
1×egg-herbie
Rules
6382×*-lowering-*.f32
6382×*-lowering-*.f64
5536×+-lowering-+.f64
5536×+-lowering-+.f32
1360×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
090015458
1321212836
0833412836
Stop Event
1×iter limit
1×node limit
Counts
408 → 408
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)))))
(+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))
(+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))
(+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))
(+ (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (* phi1 (+ (* -2 phi2) (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (* phi1 (+ (* -2 phi2) (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ 1 (+ (* 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/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2)))))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))
(+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))
(+ (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (* phi2 (+ (* -2 phi1) (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (* phi2 (+ (* -2 phi1) (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ 1 (+ (* 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/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2)))))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 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/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2)))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 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/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2)))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))
(* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 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 (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
Outputs
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R (*.f64 (*.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 (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 (*.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.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)))))))))))
(+ (* 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 (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 (/.f64 R (*.f64 lambda1 lambda1)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (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 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (/.f64 R (*.f64 lambda1 lambda1)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (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 (*.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)) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (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 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 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 (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 (*.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.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)))))))))))
(+ (* 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 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 (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)))))))))) (*.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 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)) (*.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))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(*.f64 lambda2 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 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 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 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 (* 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 (*.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)) (-.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 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ 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 (*.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 (/.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 #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 (*.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 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 #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 #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 (*.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 (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))))))))))
(+ (* 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 (*.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 phi1 (*.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 (*.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 (*.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)))) (+.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 #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 (*.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 #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 #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 (*.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 R (+.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)))))) (/.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 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 (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 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 (-.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 (*.f64 #s(literal -1/4 binary64) (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 #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 (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 (*.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 (*.f64 #s(literal -1/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)))) (+.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 (*.f64 #s(literal -1/4 binary64) (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 (+.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 (*.f64 #s(literal -1/4 binary64) (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 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 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) phi2)))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)))) phi2)) phi2)))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 (*.f64 (*.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 (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 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 (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 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)) (* 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 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))))) (/.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 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1)) (neg.f64 lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (*.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 (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 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 (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)) lambda1)))))
(* 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) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 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 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* -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) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.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 (*.f64 #s(literal 1/2 binary64) (*.f64 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 (*.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 (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 #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 #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 (*.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 (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 (+ (* (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 (*.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 (*.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 (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 #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 #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 (*.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 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 (*.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)))) (+.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 #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 (*.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 (+ 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 (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 (-.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 (*.f64 #s(literal -1/4 binary64) (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 #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 (+ (* (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 (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 (-.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 (*.f64 #s(literal -1/4 binary64) (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 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 (*.f64 #s(literal -1/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)))) (+.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 (*.f64 #s(literal -1/4 binary64) (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))))))))))))))
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 #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)))
(+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))
(+.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)))
(+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+.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))) #s(literal -2 binary64)))
(+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 lambda1 (*.f64 #s(literal -2 binary64) lambda2)))))
(+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+.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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 lambda1 (*.f64 #s(literal -2 binary64) lambda2)))))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda1)))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)) (*.f64 lambda1 lambda1)) (+.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda1))))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)) (*.f64 lambda1 lambda1)) (+.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda1))))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (/.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))) lambda1)) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (/.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))) lambda1)) lambda1)))
(+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))
(+.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)))
(+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+.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))) #s(literal -2 binary64)))
(+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 lambda2 (*.f64 #s(literal -2 binary64) lambda1))))))
(+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 lambda2 (*.f64 #s(literal -2 binary64) lambda1))))))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda2)))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda2) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2)) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (+ (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda2) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2)) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))))))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda2 lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (/.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))) lambda2)) lambda2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda2 lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) (/.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))) lambda2)) lambda2)))
(+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))
(+.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 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+.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 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))))))
(+ (* phi1 (+ (* -2 phi2) (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+.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 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 phi1 (+.f64 #s(literal 1 binary64) (*.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))))))))))
(+ (* phi1 (+ (* -2 phi2) (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ 1 (+ (* 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/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2)))))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+.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 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 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #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 phi1 (*.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))))))))))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)) (/.f64 (*.f64 phi2 phi2) (*.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)))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)) (/.f64 (*.f64 phi2 phi2) (*.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)))))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 phi2 #s(literal 2 binary64)) (/.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 phi2 phi2)) phi1)) phi1)))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 phi2 #s(literal 2 binary64)) (/.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 phi2 phi2)) phi1)) phi1)))
(+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))
(+.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 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+.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 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))))))
(+ (* phi2 (+ (* -2 phi1) (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+.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 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 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))))))))))
(+ (* phi2 (+ (* -2 phi1) (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ 1 (+ (* 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/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2)))))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+.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 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 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (+.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 phi2 (*.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))))))))))
(pow phi2 2)
(*.f64 phi2 phi2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))
(*.f64 (*.f64 phi2 phi2) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)) (/.f64 (*.f64 phi1 phi1) (*.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)))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))
(*.f64 (*.f64 phi2 phi2) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)) (/.f64 (*.f64 phi1 phi1) (*.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)))))
(pow phi2 2)
(*.f64 phi2 phi2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 phi1 #s(literal 2 binary64)) (/.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 phi1 phi1)) phi2)) phi2)))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 phi1 #s(literal 2 binary64)) (/.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 phi1 phi1)) phi2)) phi2)))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))
(+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+.f64 (*.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))) #s(literal -2 binary64)))
(+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 lambda1 (*.f64 #s(literal -2 binary64) lambda2)))))
(+ (* lambda1 (+ (* -2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)) (*.f64 lambda1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 lambda1 (*.f64 #s(literal -2 binary64) lambda2)))))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda1)))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)) (*.f64 lambda1 lambda1)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda1))))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (+ (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda1 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)) (*.f64 lambda1 lambda1)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda1))))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(* (pow lambda1 2) (+ (* -2 (/ (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda2) (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 2 binary64)) (*.f64 lambda2 lambda2)) lambda1)) lambda1)))
(* (pow lambda1 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda1)) (* 2 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda1)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda1 lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda2) (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 2 binary64)) (*.f64 lambda2 lambda2)) lambda1)) lambda1)))
(* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))
(+ (* -2 (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+.f64 (*.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))) #s(literal -2 binary64)))
(+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+.f64 (*.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 lambda2 (*.f64 #s(literal -2 binary64) lambda1)))))
(+ (* lambda2 (+ (* -2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(+.f64 (*.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 lambda2 (*.f64 #s(literal -2 binary64) lambda1)))))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda2)))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (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 2 binary64)) (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2)))))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (+ (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow lambda2 2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (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 2 binary64)) (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2)))))
(* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))
(* (pow lambda2 2) (+ (* -2 (/ (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64))) lambda2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda2 lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda1) (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 2 binary64)) (*.f64 lambda1 lambda1)) lambda2)) lambda2)))
(* (pow lambda2 2) (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) lambda2)) (* 2 (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) lambda2)) (pow (cos (* 1/2 (+ phi1 phi2))) 2)))
(*.f64 (*.f64 lambda2 lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda1) (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 2 binary64)) (*.f64 lambda1 lambda1)) lambda2)) lambda2)))
(* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))
(+ (* -1 (* phi1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))
(-.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 phi1 (*.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)))))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))
(+.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 phi1 (-.f64 (*.f64 phi1 (*.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 (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))))))
(+ (* phi1 (+ (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 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/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2)))))) (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))
(+.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 phi1 (-.f64 (*.f64 phi1 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #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 phi1 (*.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 (*.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))))))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))
(+ (* -1 (* phi2 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))
(-.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 phi2 (*.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)))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))
(+.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 phi2 (-.f64 (*.f64 phi2 (*.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 (*.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))))))
(+ (* phi2 (+ (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* 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/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2)))))) (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))
(+.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 phi2 (-.f64 (*.f64 phi2 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (+.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 phi2 (*.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 (*.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))))))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))
(*.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)))
(* 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 (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 (*.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.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)))))))))))
(+ (* 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 (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 (/.f64 R (*.f64 lambda1 lambda1)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (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 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (/.f64 R (*.f64 lambda1 lambda1)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (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 (*.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)) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 (/.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (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 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 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 (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 (*.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.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)))))))))))
(+ (* 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 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 (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)))))))))) (*.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 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)) (*.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))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(*.f64 lambda2 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 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 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 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 (* 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 (*.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)) (-.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 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ 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 (*.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 (/.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 #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 (*.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 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 #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 #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 (*.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 (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))))))))))
(+ (* 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 (*.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 phi1 (*.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 (*.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 (*.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)))) (+.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 #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 (*.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 #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 #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 (*.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 R (+.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)))))) (/.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 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 (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 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 (-.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 (*.f64 #s(literal -1/4 binary64) (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 #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 (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 (*.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 (*.f64 #s(literal -1/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)))) (+.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 (*.f64 #s(literal -1/4 binary64) (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 (+.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 (*.f64 #s(literal -1/4 binary64) (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 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 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) phi2)))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)))) phi2)) phi2)))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 (*.f64 (*.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 (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 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 (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 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 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)) (* 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 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))))) (/.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 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1)) (neg.f64 lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (*.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 (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 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 (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)) lambda1)))))
(* 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) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 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 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* -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) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.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 (*.f64 #s(literal 1/2 binary64) (*.f64 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 (*.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 (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 #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 #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 (*.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 (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 (+ (* (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 (*.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 (*.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 (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 #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 #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 (*.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 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 (*.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)))) (+.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 #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 (*.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 (+ 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 (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 (-.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 (*.f64 #s(literal -1/4 binary64) (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 #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 (+ (* (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 (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 (-.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 (*.f64 #s(literal -1/4 binary64) (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 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 (*.f64 #s(literal -1/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)))) (+.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 (*.f64 #s(literal -1/4 binary64) (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))))))))))))))
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 #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 (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 #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 (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 (*.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 (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 (+.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)))
(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)))

eval199.0ms (1.2%)

Compiler

Compiled 45432 to 2899 computations (93.6% saved)

prune159.0ms (0.9%)

Pruning

25 alts after pruning (25 fresh and 0 done)

PrunedKeptTotal
New979251004
Fresh000
Picked202
Done000
Total981251006
Accuracy
97.6%
Counts
1006 → 25
Alt Table
Click to see full alt table
StatusAccuracyProgram
12.7%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
19.8%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
32.1%
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
▶32.0%
(*.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))
21.6%
(*.f64 (-.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)) (-.f64 #s(literal 0 binary64) lambda2))
58.2%
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
19.6%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
12.5%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
56.9%
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
71.0%
(*.f64 R (hypot.f64 (/.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 phi1 phi2)))
85.3%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
91.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
▶91.5%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
91.4%
(*.f64 R (hypot.f64 (*.f64 (*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
53.7%
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
▶12.7%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
19.8%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
19.6%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
54.0%
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
31.6%
(*.f64 R (*.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))))
27.5%
(*.f64 R (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi1 phi2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 lambda1 lambda2)))))
57.1%
(*.f64 R (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))))))
26.4%
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
▶20.6%
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
▶33.5%
(*.f64 R phi2)
Compiler

Compiled 1022 to 670 computations (34.4% saved)

simplify181.0ms (1.1%)

Algorithm
1×egg-herbie
Localize:

Found 16 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓cost-diff0
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
✓cost-diff6784
(-.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))
✓cost-diff6848
(*.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))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓cost-diff0
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓cost-diff0
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
✓cost-diff0
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
✓cost-diff0
(*.f64 phi1 phi1)
✓cost-diff128
(sqrt.f64 (*.f64 phi1 phi1))
✓cost-diff128
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
✓cost-diff0
(*.f64 R phi2)
✓cost-diff0
(-.f64 lambda1 lambda2)
✓cost-diff0
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓cost-diff0
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))
✓cost-diff0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
Rules
2748×*-lowering-*.f32
2748×*-lowering-*.f64
1516×+-lowering-+.f64
1516×+-lowering-+.f32
1186×distribute-lft-in
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
034208
187208
2208196
3725195
43618194
08266194
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(- lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(- phi1 phi2)
phi2
(* R phi2)
R
phi2
(* R (sqrt (* phi1 phi1)))
R
(sqrt (* phi1 phi1))
(* phi1 phi1)
phi1
(* 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)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (neg lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1))
(* R (cos (* 1/2 (+ phi1 phi2))))
R
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
1/2
(+ phi1 phi2)
phi1
phi2
(/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1)
(* (* R lambda2) (cos (* 1/2 (+ phi1 phi2))))
(* R lambda2)
lambda2
lambda1
(neg lambda1)
Outputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(- phi1 phi2)
(-.f64 phi1 phi2)
phi2
(* R phi2)
(*.f64 R phi2)
R
phi2
(* R (sqrt (* phi1 phi1)))
(*.f64 R (fabs.f64 phi1))
R
(sqrt (* phi1 phi1))
(fabs.f64 phi1)
(* phi1 phi1)
(*.f64 phi1 phi1)
phi1
(* R (* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2)))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))
R
(* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
(- 0 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
0
#s(literal 0 binary64)
lambda2
(* (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (neg lambda1))
(*.f64 lambda1 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 R (/.f64 (*.f64 R lambda2) lambda1)))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
R
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
(/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1)
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))
(* (* R lambda2) (cos (* 1/2 (+ phi1 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(* R lambda2)
(*.f64 R lambda2)
lambda2
lambda1
(neg lambda1)
(-.f64 #s(literal 0 binary64) lambda1)

localize371.0ms (2.2%)

Localize:

Found 16 expressions of interest:

NewMetricScoreProgram
✓accuracy99.7%
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
✓accuracy91.3%
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
✓accuracy91.0%
(*.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))
✓accuracy82.6%
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓accuracy99.8%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
✓accuracy99.7%
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
✓accuracy82.6%
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓accuracy100.0%
(*.f64 phi1 phi1)
✓accuracy100.0%
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
✓accuracy54.3%
(sqrt.f64 (*.f64 phi1 phi1))
✓accuracy100.0%
(*.f64 R phi2)
✓accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
✓accuracy100.0%
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))
✓accuracy99.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
✓accuracy99.9%
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
Results
198.0ms182×1valid
66.0ms74×0valid
Compiler

Compiled 224 to 32 computations (85.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 170.0ms
ival-mult: 55.0ms (32.3% of total)
ival-sub: 48.0ms (28.2% of total)
ival-cos: 21.0ms (12.3% of total)
backward-pass: 16.0ms (9.4% of total)
compiled-spec: 14.0ms (8.2% of total)
ival-sqrt: 6.0ms (3.5% of total)
ival-add: 4.0ms (2.4% of total)
ival-div: 3.0ms (1.8% of total)
ival-neg: 2.0ms (1.2% of total)
const: 1.0ms (0.6% of total)

series114.0ms (0.7%)

Counts
17 → 600
Calls
Call 1
Inputs
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (* (- lambda1 lambda2) (cos (* 1/2 phi1)))>
#<alt (- lambda1 lambda2)>
#<alt (* R phi2)>
#<alt (* R (sqrt (* phi1 phi1)))>
#<alt (sqrt (* phi1 phi1))>
#<alt (* phi1 phi1)>
#<alt (* R (* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2)))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (* 1/2 (+ phi1 phi2))>
#<alt (* (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (neg lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (cos (* 1/2 phi1))>
#<alt (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1)>
Outputs
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1)))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))>
#<alt (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))>
#<alt (* -1 (* R phi2))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda1)) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (cos (* 1/2 phi1)))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda2)) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))>
#<alt (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))))))))>
#<alt phi2>
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (* -1 phi2)>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi1)))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))>
#<alt (- lambda1 lambda2)>
#<alt (- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R phi2)>
#<alt (* R 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 phi1>
#<alt phi1>
#<alt phi1>
#<alt phi1>
#<alt phi1>
#<alt phi1>
#<alt phi1>
#<alt phi1>
#<alt (* -1 phi1)>
#<alt (* -1 phi1)>
#<alt (* -1 phi1)>
#<alt (* -1 phi1)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 2)>
#<alt (pow phi1 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))>
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (* 1/2 phi2)>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (* 1/2 phi1)>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))>
#<alt (* 1/2 phi1)>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))>
#<alt (* 1/2 phi1)>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (+ (* 1/2 phi1) (* 1/2 phi2))>
#<alt (* 1/2 phi2)>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))>
#<alt (* 1/2 phi2)>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))>
#<alt (* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))>
#<alt (+ (* -1 (* lambda1 (* phi1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))>
#<alt (+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))) (* phi1 (+ (* -1 (* lambda1 (* phi1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))))))>
#<alt (+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))) (* phi1 (+ (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (* phi1 (+ (* -1 (* lambda1 (* phi1 (- (* 1/48 (* R (sin (* 1/2 phi2)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))))))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))>
#<alt (+ (* -1 (* lambda1 (* phi2 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))>
#<alt (+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))) (* phi2 (+ (* -1 (* lambda1 (* phi2 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))))))>
#<alt (+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))) (* phi2 (+ (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (* phi2 (+ (* -1 (* lambda1 (* phi2 (- (* 1/48 (* R (sin (* 1/2 phi1)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))))))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))>
#<alt (* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<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)) (* R (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))>
#<alt (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))>
#<alt (* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))>
#<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 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))>
#<alt (- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))>
#<alt (- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))>
#<alt (- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (- (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* phi1 (- (* 1/48 (* R (sin (* 1/2 phi2)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))>
#<alt (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))>
#<alt (- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))>
#<alt (- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))>
#<alt (- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (- (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* phi2 (- (* 1/48 (* R (sin (* 1/2 phi1)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))>
#<alt (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))>
#<alt (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))>
#<alt (/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)>
#<alt (/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)>
#<alt (/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 phi2)))>
#<alt (+ (* -1/2 (* R (* phi1 (sin (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))>
#<alt (+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/8 (* R (* phi1 (cos (* 1/2 phi2))))))))>
#<alt (+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* 1/48 (* R (* phi1 (sin (* 1/2 phi2))))))))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* R (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* R (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* R (cos (* 1/2 (- phi2 (* -1 phi1)))))>
#<alt (* R (cos (* 1/2 phi1)))>
#<alt (+ (* -1/2 (* R (* phi2 (sin (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))>
#<alt (+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/8 (* R (* phi2 (cos (* 1/2 phi1))))))))>
#<alt (+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* 1/48 (* R (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* R (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* R (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* R (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt (* R (cos (* 1/2 (- phi1 (* -1 phi2)))))>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)>
#<alt (+ (* -1/2 (/ (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))) lambda1)) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))>
#<alt (+ (* phi1 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)) (* -1/8 (/ (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))) lambda1)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))>
#<alt (+ (* phi1 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)) (* phi1 (+ (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* 1/48 (/ (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))) lambda1)))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)>
#<alt (+ (* -1/2 (/ (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))) lambda1)) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))>
#<alt (+ (* phi2 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)) (* -1/8 (/ (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))) lambda1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))>
#<alt (+ (* phi2 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)) (* phi2 (+ (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* 1/48 (/ (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))) lambda1)))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
#<alt (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)>
Calls

150 calls:

TimeVariablePointExpression
19.0ms
phi1
@0
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
17.0ms
lambda1
@inf
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1))
11.0ms
phi2
@0
(* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2))
4.0ms
phi2
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))
3.0ms
lambda2
@inf
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))

rewrite477.0ms (2.8%)

Algorithm
1×batch-egg-rewrite
Rules
3568×*-lowering-*.f32
3568×*-lowering-*.f64
2896×/-lowering-/.f32
2896×/-lowering-/.f64
2240×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
034146
1164144
21377144
08626144
Stop Event
1×iter limit
1×node limit
Counts
17 → 333
Calls
Call 1
Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi1))) (* (- lambda1 lambda2) (cos (* 1/2 phi1)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi1)))
(- lambda1 lambda2)
(* R phi2)
(* R (sqrt (* phi1 phi1)))
(sqrt (* phi1 phi1))
(* phi1 phi1)
(* R (* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2)))
(* (cos (* 1/2 (+ phi1 phi2))) (- 0 lambda2))
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(* (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (neg lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1))
(* R (cos (* 1/2 (+ phi1 phi2))))
(cos (* 1/2 phi1))
(/ (* (* R lambda2) (cos (* 1/2 (+ phi1 phi2)))) lambda1)
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)) R)
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(sqrt.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)))))) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))))))))
(/.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(*.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))))))) #s(literal 1/2 binary64)))
(*.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2)))))))))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(*.f64 (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64)))
(fma.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(+.f64 (+.f64 lambda1 #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) 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)))
(-.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2)
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))) (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (*.f64 lambda2 lambda2)) lambda1)
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) lambda2) lambda1)
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 (-.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 (+.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 lambda1 #s(literal 0 binary64)) #s(literal 3 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 (+.f64 lambda1 #s(literal 0 binary64)) (+.f64 lambda1 #s(literal 0 binary64))) (-.f64 (*.f64 lambda2 lambda2) (*.f64 (+.f64 lambda1 #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) lambda2)))))
(/.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 (pow.f64 (+.f64 lambda1 #s(literal 0 binary64)) #s(literal 3 binary64)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 (+.f64 lambda1 #s(literal 0 binary64)) (+.f64 lambda1 #s(literal 0 binary64))) (+.f64 (*.f64 lambda2 lambda2) (*.f64 (+.f64 lambda1 #s(literal 0 binary64)) lambda2))))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 R phi2)
(*.f64 phi2 R)
(*.f64 R phi1)
(*.f64 phi1 R)
(*.f64 (sqrt.f64 phi1) (*.f64 (sqrt.f64 phi1) R))
(*.f64 (*.f64 R (sqrt.f64 phi1)) (sqrt.f64 phi1))
phi1
(exp.f64 (log.f64 phi1))
(exp.f64 (*.f64 (log.f64 phi1) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 phi1)) #s(literal 2 binary64)))
(fabs.f64 phi1)
(fabs.f64 (neg.f64 phi1))
(fabs.f64 (neg.f64 (neg.f64 phi1)))
(sqrt.f64 (*.f64 phi1 phi1))
(pow.f64 phi1 #s(literal 1 binary64))
(pow.f64 (*.f64 phi1 phi1) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 phi1) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) #s(literal 1/4 binary64))
(*.f64 (sqrt.f64 phi1) (sqrt.f64 phi1))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 phi1)))
(fabs.f64 (*.f64 phi1 phi1))
(fabs.f64 (*.f64 phi1 (neg.f64 phi1)))
(fabs.f64 (*.f64 (neg.f64 phi1) phi1))
(sqrt.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)))
(pow.f64 phi1 #s(literal 2 binary64))
(pow.f64 (*.f64 phi1 phi1) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 phi1) #s(literal 4 binary64))
(pow.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) #s(literal 1/2 binary64))
(*.f64 phi1 phi1)
(*.f64 (neg.f64 phi1) (neg.f64 phi1))
(+.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))))
(+.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))
(fma.f64 #s(literal 0 binary64) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))))
(fma.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))))
(neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))
(/.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 lambda2 lambda2))
(/.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2))) lambda2)
(/.f64 (neg.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) lambda2))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64)) (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 #s(literal 0 binary64) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))))))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 R lambda2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) R)
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(*.f64 (*.f64 R lambda2) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))
(*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 R lambda2))
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(*.f64 (/.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) lambda2))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(neg.f64 (*.f64 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))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 lambda2 lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2))) lambda2)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 lambda2 lambda2))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda2)
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) lambda2))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (-.f64 #s(literal 0 binary64) lambda2))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 0 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 #s(literal 0 binary64) (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 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (*.f64 #s(literal 0 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(*.f64 (-.f64 #s(literal 0 binary64) 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))) lambda2) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) lambda2))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) lambda2) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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) phi1) (*.f64 #s(literal 1/2 binary64) phi2))
(+.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #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 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 #s(literal 1/2 binary64) phi2 (*.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 phi2 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))
(/.f64 (+.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 1/8 binary64)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal 1/8 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2))
(/.f64 (*.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) #s(literal 1/2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 phi1 phi2))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 1/8 binary64)) (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal 1/8 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (neg.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (neg.f64 (-.f64 phi1 phi2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) (neg.f64 (-.f64 phi1 phi2)))
(/.f64 (+.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 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi1)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi1 phi2))))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi1 phi2))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (+.f64 phi1 phi2))
(*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (/.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1))))
(+.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(fma.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)))
(fma.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1))))
(neg.f64 (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) lambda1)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))))) (neg.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))))) (neg.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) lambda1))) (neg.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda1))) (neg.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))) (*.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (-.f64 #s(literal 0 binary64) lambda1))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(*.f64 #s(literal -1 binary64) (*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(*.f64 (neg.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) lambda1)
(*.f64 (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) #s(literal -1 binary64)) 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)) (-.f64 #s(literal 0 binary64) lambda1)))
(+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (+.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 R lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) (/.f64 #s(literal 1 binary64) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (fma.f64 (neg.f64 (*.f64 R lambda2)) (/.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 (*.f64 R lambda2) lambda1))))
(+.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+.f64 (fma.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 (*.f64 lambda2 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) R))) (fma.f64 (neg.f64 (*.f64 lambda2 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) R (*.f64 (*.f64 lambda2 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) R)))
(+.f64 (fma.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) lambda1)) R))) (fma.f64 (neg.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) lambda1))) R (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) lambda1)) R)))
(+.f64 (fma.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) R))) (fma.f64 (neg.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) R (*.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) R)))
(+.f64 (fma.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 (*.f64 R (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) lambda2))) (fma.f64 (neg.f64 (*.f64 R (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) lambda2 (*.f64 (*.f64 R (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) lambda2)))
(+.f64 (fma.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 (*.f64 (*.f64 R lambda2) (/.f64 #s(literal 1 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (fma.f64 (neg.f64 (*.f64 (*.f64 R lambda2) (/.f64 #s(literal 1 binary64) lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 (*.f64 (*.f64 R lambda2) (/.f64 #s(literal 1 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(+.f64 (fma.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 (/.f64 (*.f64 R lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (fma.f64 (neg.f64 (/.f64 (*.f64 R lambda2) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 (/.f64 (*.f64 R lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(+.f64 (fma.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))))))
(+.f64 (fma.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 1 binary64))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (neg.f64 (*.f64 (*.f64 lambda2 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) R))) (fma.f64 (neg.f64 (*.f64 lambda2 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) R (*.f64 (*.f64 lambda2 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) R)))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (neg.f64 (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) lambda1)) R))) (fma.f64 (neg.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) lambda1))) R (*.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) lambda1)) R)))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (neg.f64 (*.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) R))) (fma.f64 (neg.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) R (*.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) R)))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (neg.f64 (*.f64 (*.f64 R (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) lambda2))) (fma.f64 (neg.f64 (*.f64 R (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) lambda2 (*.f64 (*.f64 R (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) lambda2)))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (neg.f64 (*.f64 (*.f64 (*.f64 R lambda2) (/.f64 #s(literal 1 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (fma.f64 (neg.f64 (*.f64 (*.f64 R lambda2) (/.f64 #s(literal 1 binary64) lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 (*.f64 (*.f64 R lambda2) (/.f64 #s(literal 1 binary64) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (neg.f64 (*.f64 (/.f64 (*.f64 R lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (fma.f64 (neg.f64 (/.f64 (*.f64 R lambda2) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 (/.f64 (*.f64 R lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) #s(literal 1 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 1 binary64))))
(-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))
(-.f64 (/.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))))
(-.f64 (/.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(fma.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)) (-.f64 #s(literal 0 binary64) lambda1)))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)))
(fma.f64 (*.f64 R lambda2) (neg.f64 (/.f64 (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)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (neg.f64 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) (/.f64 #s(literal 1 binary64) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(fma.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) (+.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 R lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(fma.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(fma.f64 (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (+.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 R lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(fma.f64 (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(fma.f64 (neg.f64 (*.f64 R lambda2)) (/.f64 (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 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)) (*.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)) (-.f64 #s(literal 0 binary64) lambda1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))) (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))) (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)) (*.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)) (-.f64 #s(literal 0 binary64) lambda1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)))) (neg.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) (*.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)))) (*.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (*.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)))) (*.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 R lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (-.f64 (*.f64 (+.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 R lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (+.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 R lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (+.f64 (*.f64 (neg.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 R lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (-.f64 (*.f64 (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) #s(literal 3 binary64)) (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) (/.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))) (+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))) (*.f64 (/.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (/.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))) (+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))) (*.f64 (/.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))))) (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))) (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))))
(*.f64 (-.f64 (*.f64 (*.f64 R R) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) R)
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(exp.f64 (*.f64 (log.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) lambda1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)))
(neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (-.f64 #s(literal 0 binary64) lambda1)))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) (-.f64 #s(literal 0 binary64) lambda1))
(/.f64 #s(literal 1 binary64) (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) #s(literal 1 binary64)) lambda1)
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)))) (neg.f64 (-.f64 #s(literal 0 binary64) lambda1)))
(/.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) #s(literal -1 binary64)) lambda1)
(/.f64 (neg.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) lambda1))))
(/.f64 (neg.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) lambda1))
(/.f64 (neg.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) lambda1))
(pow.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 R (*.f64 lambda2 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)))
(*.f64 R (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) lambda1)))
(*.f64 R (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))
(*.f64 lambda2 (*.f64 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 (*.f64 R lambda2) (/.f64 #s(literal 1 binary64) lambda1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1))
(*.f64 (*.f64 R lambda2) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (/.f64 #s(literal 1 binary64) lambda1))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda2))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda1)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 R lambda2) lambda1)))
(*.f64 (/.f64 #s(literal 1 binary64) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))
(*.f64 (/.f64 #s(literal 1 binary64) lambda1) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (*.f64 R lambda2))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (/.f64 (neg.f64 (*.f64 R lambda2)) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)) #s(literal -1 binary64)))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 R lambda2) lambda1) (/.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal -1 binary64)))
(*.f64 (/.f64 R lambda1) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal -1 binary64)))
(*.f64 (/.f64 R #s(literal -1 binary64)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) lambda1))
(*.f64 (/.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))
(*.f64 (/.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (/.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 R lambda2) #s(literal -1 binary64)) (/.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 (neg.f64 (*.f64 R lambda2)) lambda1))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)) lambda1))
(*.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) R) lambda1))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal -1 binary64)) (/.f64 R lambda1))
(*.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)) lambda1) (/.f64 R #s(literal -1 binary64)))
(*.f64 (/.f64 (neg.f64 (*.f64 R lambda2)) #s(literal -1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(*.f64 (/.f64 (neg.f64 (*.f64 R lambda2)) lambda1) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)) #s(literal -1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
(*.f64 (/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) lambda2)) lambda1) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) lambda2) #s(literal -1 binary64)) (/.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1) (/.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal -1 binary64)) (/.f64 (*.f64 R lambda2) lambda1))
(*.f64 (/.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1) (/.f64 (*.f64 R lambda2) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) lambda1) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) #s(literal -1 binary64)))
(*.f64 (/.f64 (neg.f64 R) lambda1) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) #s(literal -1 binary64)))
(*.f64 (/.f64 (neg.f64 R) #s(literal -1 binary64)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1))

simplify491.0ms (2.9%)

Algorithm
1×egg-herbie
Rules
6740×*-lowering-*.f32
6740×*-lowering-*.f64
5146×+-lowering-+.f64
5146×+-lowering-+.f32
1218×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
099810796
135859660
083529660
Stop Event
1×iter limit
1×node limit
Counts
600 → 600
Calls
Call 1
Inputs
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (cos (* 1/2 phi1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1)))))))))
(* -1 (* lambda1 (cos (* 1/2 phi1))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda1)) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (cos (* 1/2 phi1)))
(* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1))))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1)))))))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda2)) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(* lambda1 (cos (* 1/2 phi1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (cos (* 1/2 phi1)))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(* lambda1 (cos (* 1/2 phi1)))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(- lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R phi2)
(* R 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))
phi1
phi1
phi1
phi1
phi1
phi1
phi1
phi1
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 2)
(pow phi1 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))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(* 1/2 phi2)
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(* 1/2 phi2)
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* 1/2 phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))
(+ (* -1 (* lambda1 (* phi1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))) (* phi1 (+ (* -1 (* lambda1 (* phi1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))))))
(+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))) (* phi1 (+ (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (* phi1 (+ (* -1 (* lambda1 (* phi1 (- (* 1/48 (* R (sin (* 1/2 phi2)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))))))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))
(+ (* -1 (* lambda1 (* phi2 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))) (* phi2 (+ (* -1 (* lambda1 (* phi2 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))))))
(+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))) (* phi2 (+ (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (* phi2 (+ (* -1 (* lambda1 (* phi2 (- (* 1/48 (* R (sin (* 1/2 phi1)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))))))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* 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)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))
(* -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 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (- (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* phi1 (- (* 1/48 (* R (sin (* 1/2 phi2)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))
(- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))
(- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))
(- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (- (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* phi2 (- (* 1/48 (* R (sin (* 1/2 phi1)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))
(- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))
(- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))
(- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))
(* R (cos (* 1/2 (+ phi1 phi2))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)
(/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)
(/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)
(* R (cos (* 1/2 (+ phi1 phi2))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 phi2)))
(+ (* -1/2 (* R (* phi1 (sin (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/8 (* R (* phi1 (cos (* 1/2 phi2))))))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* 1/48 (* R (* phi1 (sin (* 1/2 phi2))))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 phi1)))
(+ (* -1/2 (* R (* phi2 (sin (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/8 (* R (* phi2 (cos (* 1/2 phi1))))))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* 1/48 (* R (* phi2 (sin (* 1/2 phi1))))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
1
(+ 1 (* -1/8 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)
(+ (* -1/2 (/ (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))) lambda1)) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(+ (* phi1 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)) (* -1/8 (/ (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))) lambda1)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(+ (* phi1 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)) (* phi1 (+ (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* 1/48 (/ (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))) lambda1)))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)
(+ (* -1/2 (/ (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))) lambda1)) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(+ (* phi2 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)) (* -1/8 (/ (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))) lambda1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(+ (* phi2 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)) (* phi2 (+ (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* 1/48 (/ (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))) lambda1)))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
Outputs
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 (*.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* R (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1)))))
(*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))
(*.f64 lambda1 (+.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 lambda1 lambda1)) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))
(*.f64 lambda1 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda1 lambda1))))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* R (cos (* 1/2 phi1))))))
(*.f64 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi1))))) lambda1)) (* R (cos (* 1/2 phi1))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) phi1)))))) lambda1)) lambda1)) (neg.f64 lambda1))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (*.f64 (*.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1)))))
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))))
(*.f64 lambda2 (+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (*.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) phi1)) (*.f64 lambda2 lambda2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi1))))) (* R (cos (* 1/2 phi1)))))))
(*.f64 lambda2 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda2 lambda2))))) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi1)))) lambda2)) (* R (cos (* 1/2 phi1))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi1))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi1))))) lambda2)) (* R (cos (* 1/2 phi1))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 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) phi1)))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(-.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 (*.f64 R (*.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R phi1) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)) (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (*.f64 (*.f64 phi1 phi2) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 R phi2)))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) R) phi1) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (/.f64 phi2 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R (*.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R phi2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (*.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (*.f64 (*.f64 phi1 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)) #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))) (*.f64 (*.f64 R phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) R) phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (/.f64 phi1 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))
(* -1 (* R phi2))
(-.f64 #s(literal 0 binary64) (*.f64 R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64))))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(* lambda1 (cos (* 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1))))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi1)))))))))
(*.f64 lambda1 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 (-.f64 phi1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 phi1 phi2) (*.f64 lambda1 lambda1)))))))
(* -1 (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi1))))) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda1)) (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) lambda1)) (neg.f64 lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi1)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda1)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi1)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi1)) 2) (- (pow (cos (* 1/2 phi1)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi1)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) lambda1)))))
(* lambda2 (cos (* 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2)
(* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2))))
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1))))))))
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda2 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi1)))))))))
(*.f64 lambda2 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 lambda2 lambda2)))))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi1))))) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (-.f64 phi1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 phi1 phi2) lambda2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi1))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi1))))) lambda2)) (* lambda1 (cos (* 1/2 phi1)))) lambda2)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 (-.f64 lambda1 lambda2) phi2)
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(-.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (*.f64 (*.f64 phi1 phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (+.f64 (-.f64 #s(literal 0 binary64) phi2) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi2 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) (*.f64 (*.f64 (*.f64 phi1 phi2) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))))) (*.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi2 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (/.f64 phi2 phi1))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.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 phi1)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1))) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1)))) phi1)) phi1)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (+.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi1 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))) (*.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 phi1 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)) #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))) (*.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) (*.f64 (/.f64 phi1 phi2) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))
(* -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)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)) phi2)))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* lambda1 (cos (* 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(* lambda1 (cos (* 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda2 (cos (* 1/2 phi1))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 lambda1))
(* lambda1 (cos (* 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1)
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi1))) (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1 (/ (* lambda1 (cos (* 1/2 phi1))) lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi1 2) (- lambda1 lambda2)))) lambda2)
(+.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64)) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2))
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi1 2) (- lambda1 lambda2)))))) lambda2)
(+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64)))) (-.f64 lambda1 lambda2))
(- (+ lambda1 (* (pow phi1 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(+.f64 lambda1 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/46080 binary64))))))) lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (neg.f64 lambda1))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (neg.f64 lambda1))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R phi2)
(*.f64 R phi2)
(* R 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)
(* -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))
phi1
phi1
phi1
phi1
phi1
phi1
phi1
phi1
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 phi1)
(pow phi1 2)
(*.f64 phi1 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 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 #s(literal 0 binary64) (*.f64 (*.f64 R 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 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/8 binary64)))))) (*.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 #s(literal 0 binary64) (*.f64 (*.f64 R 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 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/8 binary64)))))) (*.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.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)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi1)))) (* 1/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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(+ (* -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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(+ (* -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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.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)))))
(*.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)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (cos (* 1/2 (- phi1 (* -1 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 (* -1 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 (* -1 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 (* -1 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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.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)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) 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 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #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 (*.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 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 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 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64))))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(-.f64 #s(literal 0 binary64) (*.f64 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 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 phi1 phi2)) #s(literal -1/2 binary64))))
(* -1 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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 (* R (* lambda1 (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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)))
(* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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)))
(* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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)))
(* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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)))
(* R (* lambda1 (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (*.f64 R lambda1) (+.f64 (-.f64 #s(literal 0 binary64) (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 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))
(*.f64 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) (neg.f64 lambda1))
(+ (* -1 (* lambda1 (* phi1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(*.f64 (neg.f64 lambda1) (+.f64 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))) (*.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))))))
(+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))) (* phi1 (+ (* -1 (* lambda1 (* phi1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))))))
(-.f64 (*.f64 phi1 (*.f64 (neg.f64 lambda1) (+.f64 (*.f64 phi1 (*.f64 #s(literal -1/8 binary64) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))))) (*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))))
(+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))) (* phi1 (+ (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (* phi1 (+ (* -1 (* lambda1 (* phi1 (- (* 1/48 (* R (sin (* 1/2 phi2)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))))))))
(-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 (neg.f64 lambda1) (+.f64 (*.f64 phi1 (*.f64 #s(literal 1/48 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))) (*.f64 #s(literal -1/8 binary64) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))))) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))))) (*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))
(*.f64 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))) (neg.f64 lambda1))
(+ (* -1 (* lambda1 (* phi2 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))
(*.f64 (neg.f64 lambda1) (+.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))))
(+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))) (* phi2 (+ (* -1 (* lambda1 (* phi2 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))))))
(-.f64 (*.f64 phi2 (*.f64 (neg.f64 lambda1) (+.f64 (*.f64 phi2 (*.f64 #s(literal -1/8 binary64) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))))))) (*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))))
(+ (* -1 (* lambda1 (- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)))) (* phi2 (+ (* -1 (* lambda1 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (* phi2 (+ (* -1 (* lambda1 (* phi2 (- (* 1/48 (* R (sin (* 1/2 phi1)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)))))) (* -1 (* lambda1 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))))))))
(-.f64 (*.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 (neg.f64 lambda1) (+.f64 (*.f64 phi2 (*.f64 #s(literal 1/48 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))))) (*.f64 #s(literal -1/8 binary64) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))))) (*.f64 lambda1 (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))))))) (*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (*.f64 R lambda1) (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 (+ (* -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)) (* 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)) (* 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)))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))
(-.f64 #s(literal 0 binary64) (*.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 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))
(-.f64 #s(literal 0 binary64) (*.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 (* lambda2 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2))))
(-.f64 #s(literal 0 binary64) (*.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)))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))
(*.f64 lambda1 (*.f64 R (+.f64 (-.f64 #s(literal 0 binary64) (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 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))
(*.f64 lambda1 (*.f64 R (+.f64 (-.f64 #s(literal 0 binary64) (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 (+ (* -1 (* R (cos (* 1/2 (+ phi1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))
(*.f64 lambda1 (*.f64 R (+.f64 (-.f64 #s(literal 0 binary64) (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 (* 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 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 lambda1 (neg.f64 (*.f64 R (-.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)))))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 R (-.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)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 R (-.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)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 R (-.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)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 R (-.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)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 R (-.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)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 R (-.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)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 R (-.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)))
(* R (- (cos (* 1/2 (+ phi1 phi2))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 R (-.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)))
(* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (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) R))
(* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (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) R))
(* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (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) R))
(* -1 (* R (- (* -1 (cos (* 1/2 (+ phi1 phi2)))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (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) R))
(- (* R (cos (* 1/2 phi2))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
(- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(+.f64 (*.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))
(- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (- (* -1/8 (* R (cos (* 1/2 phi2)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(+.f64 (*.f64 phi1 (+.f64 (*.f64 phi1 (*.f64 #s(literal -1/8 binary64) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))
(- (+ (* R (cos (* 1/2 phi2))) (* phi1 (- (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (- (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* phi1 (- (* 1/48 (* R (sin (* 1/2 phi2)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(+.f64 (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 phi1 (*.f64 #s(literal 1/48 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))) (*.f64 #s(literal -1/8 binary64) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1))))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (- phi2 (* -1 phi1))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 phi1))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))
(- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(+.f64 (*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (- (* -1/8 (* R (cos (* 1/2 phi1)))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(+.f64 (*.f64 phi2 (+.f64 (*.f64 phi2 (*.f64 #s(literal -1/8 binary64) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))) (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1)))))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(- (+ (* R (cos (* 1/2 phi1))) (* phi2 (- (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (- (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* phi2 (- (* 1/48 (* R (sin (* 1/2 phi1)))) (* 1/48 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))))) (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(+.f64 (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 phi2 (*.f64 #s(literal 1/48 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1))))) (*.f64 #s(literal -1/8 binary64) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 R (-.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 lambda2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1)))))) (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (+ phi1 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))
(*.f64 R (-.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)))
(- (* R (cos (* 1/2 (- phi1 (* -1 phi2))))) (/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1))
(*.f64 R (-.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)))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 lambda2 (*.f64 R (-.f64 (/.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))) lambda1))))
(* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 lambda2 (*.f64 R (-.f64 (/.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))) lambda1))))
(* lambda2 (- (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2) (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))
(*.f64 lambda2 (*.f64 R (-.f64 (/.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))) lambda1))))
(* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (neg.f64 (*.f64 R (-.f64 (/.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))) lambda1)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (neg.f64 (*.f64 R (-.f64 (/.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))) lambda1)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* -1 (/ (* R (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(*.f64 (neg.f64 (*.f64 R (-.f64 (/.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))) lambda1)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1))
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)
(/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1)
(/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)
(/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1)
(/ (- (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)
(/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1)
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 R (-.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)))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 phi2)))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* R (* phi1 (sin (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))
(+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/8 (* R (* phi1 (cos (* 1/2 phi2))))))))
(+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 R phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* 1/48 (* R (* phi1 (sin (* 1/2 phi2))))))))))
(+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 R phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 phi1)))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* R (* phi2 (sin (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))
(+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/8 (* R (* phi2 (cos (* 1/2 phi1))))))))
(+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 R phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* 1/48 (* R (* phi2 (sin (* 1/2 phi1))))))))))
(+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) R) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) R) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal 1/48 binary64) (*.f64 (*.f64 R phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)
(+ (* -1/2 (/ (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))) lambda1)) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (*.f64 lambda2 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))
(+ (* phi1 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)) (* -1/8 (/ (* R (* lambda2 (* phi1 (cos (* 1/2 phi2))))) lambda1)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R (*.f64 (*.f64 lambda2 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))))
(+ (* phi1 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi2)))) lambda1)) (* phi1 (+ (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* 1/48 (/ (* R (* lambda2 (* phi1 (sin (* 1/2 phi2))))) lambda1)))))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1))
(+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 R (*.f64 (*.f64 lambda2 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1))))))
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1)
(+ (* -1/2 (/ (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))) lambda1)) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1))
(+ (* phi2 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)) (* -1/8 (/ (* R (* lambda2 (* phi2 (cos (* 1/2 phi1))))) lambda1)))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R (*.f64 (*.f64 lambda2 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1))))
(+ (* phi2 (+ (* -1/2 (/ (* R (* lambda2 (sin (* 1/2 phi1)))) lambda1)) (* phi2 (+ (* -1/8 (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1)) (* 1/48 (/ (* R (* lambda2 (* phi2 (sin (* 1/2 phi1))))) lambda1)))))) (/ (* R (* lambda2 (cos (* 1/2 phi1)))) lambda1))
(+.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) lambda1) (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 R (*.f64 (*.f64 lambda2 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1))))))
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)
(/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)
(/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)

eval186.0ms (1.1%)

Compiler

Compiled 32093 to 2642 computations (91.8% saved)

prune173.0ms (1%)

Pruning

38 alts after pruning (35 fresh and 3 done)

PrunedKeptTotal
New1077241101
Fresh91120
Picked235
Done000
Total1088381126
Accuracy
99.4%
Counts
1126 → 38
Alt Table
Click to see full alt table
StatusAccuracyProgram
9.6%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
8.2%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
▶32.1%
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
32.0%
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
32.2%
(*.f64 (-.f64 (*.f64 R (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (neg.f64 lambda1))
32.2%
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (neg.f64 lambda1))
30.8%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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))
30.8%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (neg.f64 lambda1))
16.0%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (exp.f64 (*.f64 (log.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))) #s(literal -1 binary64)))) (neg.f64 lambda1))
58.2%
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
12.7%
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
19.8%
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
▶20.8%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
12.5%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
8.9%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
▶12.7%
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
56.9%
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
8.9%
(*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
85.2%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
63.4%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
69.7%
(*.f64 R (hypot.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
85.3%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
▶91.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
✓91.5%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
76.0%
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
15.3%
(*.f64 R (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 #s(literal 0 binary64) lambda2)))
15.3%
(*.f64 R (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2)))
53.7%
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
19.6%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
9.6%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
21.1%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
54.0%
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
35.2%
(*.f64 R (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2))))
27.5%
(*.f64 R (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi1 phi2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 lambda1 lambda2)))))
▶57.1%
(*.f64 R (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))))))
26.4%
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
✓20.6%
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
✓33.5%
(*.f64 R phi2)
Compiler

Compiled 1860 to 1089 computations (41.5% saved)

simplify240.0ms (1.4%)

Algorithm
1×egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓cost-diff128
(*.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)))
✓cost-diff128
(+.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))))
✓cost-diff128
(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)))))
✓cost-diff128
(*.f64 R (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))))))
✓cost-diff0
(+.f64 phi1 phi2)
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
✓cost-diff0
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓cost-diff0
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) phi1)
✓cost-diff0
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
✓cost-diff0
(*.f64 R lambda2)
✓cost-diff0
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓cost-diff0
(*.f64 R phi1)
✓cost-diff0
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
✓cost-diff0
(-.f64 lambda1 lambda2)
✓cost-diff0
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
✓cost-diff0
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2))
✓cost-diff0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
Rules
3528×*-lowering-*.f32
3528×*-lowering-*.f64
3416×+-lowering-+.f64
3416×+-lowering-+.f32
1718×distribute-lft-in
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
039261
192243
2223240
3787240
43963240
08014240
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi2)))
(- lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi2))
(* 1/2 phi2)
1/2
phi2
(- phi1 phi2)
phi1
(- 0 (* R phi1))
0
(* R phi1)
R
phi1
(* (* R lambda2) (cos (* 1/2 phi1)))
(* R lambda2)
R
lambda2
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(* (neg R) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(neg R)
R
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
lambda2
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
1/2
(+ phi1 phi2)
phi1
phi2
(* R (sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))))
R
(sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2)))))
(+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))
(* (- phi1 phi2) (- phi1 phi2))
(- phi1 phi2)
phi1
phi2
(* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2)))
(- lambda1 lambda2)
lambda1
lambda2
(* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))
(+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1))))
1/2
(* 1/2 (cos (* (+ phi1 phi2) 1)))
(cos (* (+ phi1 phi2) 1))
(* (+ phi1 phi2) 1)
(+ phi1 phi2)
1
Outputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2))
(* (- lambda1 lambda2) (cos (* 1/2 phi2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
1/2
#s(literal 1/2 binary64)
phi2
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
(- 0 (* R phi1))
(*.f64 R (-.f64 #s(literal 0 binary64) phi1))
0
#s(literal 0 binary64)
(* R phi1)
(*.f64 R phi1)
R
phi1
(* (* R lambda2) (cos (* 1/2 phi1)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R lambda2)
(*.f64 R lambda2)
R
lambda2
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(* (neg R) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R lambda2)))
(neg R)
(-.f64 #s(literal 0 binary64) R)
R
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
lambda2
(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
(* R (sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))))
R
(sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2)))))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))
(+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))))
(* (- phi1 phi2) (- phi1 phi2))
(*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))
(- phi1 phi2)
(-.f64 phi1 phi2)
phi1
phi2
(* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2)))
(*.f64 (+.f64 #s(literal 1 binary64) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
1/2
#s(literal 1/2 binary64)
(* 1/2 (cos (* (+ phi1 phi2) 1)))
(*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))
(cos (* (+ phi1 phi2) 1))
(cos.f64 (+.f64 phi2 phi1))
(* (+ phi1 phi2) 1)
(+.f64 phi2 phi1)
(+ phi1 phi2)
(+.f64 phi2 phi1)
1
#s(literal 1 binary64)

localize448.0ms (2.6%)

Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓accuracy99.7%
(*.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))
✓accuracy99.1%
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))))
✓accuracy82.2%
(cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64)))
✓accuracy39.2%
(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)))))
✓accuracy100.0%
(neg.f64 R)
✓accuracy99.8%
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
✓accuracy99.7%
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
✓accuracy82.6%
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
✓accuracy100.0%
(*.f64 R lambda2)
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) phi1)
✓accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
✓accuracy99.8%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓accuracy100.0%
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
✓accuracy100.0%
(*.f64 R phi1)
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) phi2)
✓accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
✓accuracy99.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
✓accuracy99.8%
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
Results
299.0ms185×1valid
71.0ms71×0valid
Compiler

Compiled 298 to 38 computations (87.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 217.0ms
ival-cos: 65.0ms (29.9% of total)
ival-mult: 51.0ms (23.5% of total)
ival-add: 42.0ms (19.3% of total)
backward-pass: 24.0ms (11% of total)
compiled-spec: 16.0ms (7.4% of total)
ival-sqrt: 9.0ms (4.1% of total)
ival-sub: 8.0ms (3.7% of total)
ival-neg: 2.0ms (0.9% of total)
const: 1.0ms (0.5% of total)

series119.0ms (0.7%)

Counts
25 → 792
Calls
Call 1
Inputs
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (* (- lambda1 lambda2) (cos (* 1/2 phi2)))>
#<alt (- lambda1 lambda2)>
#<alt (- 0 (* R phi1))>
#<alt (* R phi1)>
#<alt (* (* R lambda2) (cos (* 1/2 phi1)))>
#<alt (* R lambda2)>
#<alt (cos (* 1/2 phi1))>
#<alt (* 1/2 phi1)>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (* 1/2 (+ phi1 phi2))>
#<alt (+ phi1 phi2)>
#<alt (* R (sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))))>
#<alt (sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2)))))>
#<alt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))>
#<alt (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2)))>
#<alt (cos (* 1/2 phi2))>
#<alt (* 1/2 phi2)>
#<alt (* (neg R) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (neg R)>
#<alt (cos (* (+ phi1 phi2) 1))>
#<alt (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1))))>
#<alt (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))>
Outputs
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2)))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))>
#<alt (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))>
#<alt (* -1 (* R phi2))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))>
#<alt (+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2)))))))))>
#<alt (* -1 (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda1)) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (cos (* 1/2 phi2)))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2)))))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda2)) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))>
#<alt (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))>
#<alt phi2>
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (* -1 phi2)>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 phi2)))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* -1 (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))>
#<alt (- lambda1 lambda2)>
#<alt (- (+ lambda1 (* -1/8 (* (pow phi2 2) (- lambda1 lambda2)))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi2 2) (- lambda1 lambda2)))))) lambda2)>
#<alt (- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* R phi1))>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R phi1)>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R lambda2)>
#<alt (+ (* -1/8 (* R (* lambda2 (pow phi1 2)))) (* R lambda2))>
#<alt (+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))>
#<alt (+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* R (* lambda2 (pow phi1 2)))) (* 1/384 (* R lambda2)))))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi1))))>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt 1>
#<alt (+ 1 (* -1/8 (pow phi1 2)))>
#<alt (+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))>
#<alt (+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (cos (* 1/2 phi1))>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 1/2 phi1)>
#<alt (* 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 (* 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 (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 phi2>
#<alt (+ phi1 phi2)>
#<alt (+ phi1 phi2)>
#<alt (+ phi1 phi2)>
#<alt phi1>
#<alt (* phi1 (+ 1 (/ phi2 phi1)))>
#<alt (* phi1 (+ 1 (/ phi2 phi1)))>
#<alt (* phi1 (+ 1 (/ phi2 phi1)))>
#<alt phi1>
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))>
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))>
#<alt (* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))>
#<alt phi1>
#<alt (+ phi1 phi2)>
#<alt (+ phi1 phi2)>
#<alt (+ phi1 phi2)>
#<alt phi2>
#<alt (* phi2 (+ 1 (/ phi1 phi2)))>
#<alt (* phi2 (+ 1 (/ phi1 phi2)))>
#<alt (* phi2 (+ 1 (/ phi1 phi2)))>
#<alt phi2>
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))>
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))>
#<alt (* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))>
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))>
#<alt (+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* 1/12 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (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 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))>
#<alt (+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* 1/12 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (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 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))>
#<alt (* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))>
#<alt (* -1 (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (pow (- phi1 phi2) 2)) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (* R (pow (- phi1 phi2) 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda1)) (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))>
#<alt (* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))>
#<alt (* -1 (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (pow (- phi1 phi2) 2)) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (* R (pow (- phi1 phi2) 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda2)) (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* 1/12 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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 (/ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* 1/12 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt phi2>
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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 (/ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))>
#<alt (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))))>
#<alt (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))))>
#<alt (* -1 (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))>
#<alt (* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1/2 (* (/ (pow (- phi1 phi2) 2) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (pow (- phi1 phi2) 2))) (* 1/2 (* (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda1)) (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)))))>
#<alt (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))>
#<alt (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))))>
#<alt (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))))>
#<alt (* -1 (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))>
#<alt (* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1/2 (* (/ (pow (- phi1 phi2) 2) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (pow (- phi1 phi2) 2))) (* 1/2 (* (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda2)) (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)))))>
#<alt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))>
#<alt (+ (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (* phi1 (+ (* -2 phi2) (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (* phi1 (+ (* -2 phi2) (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ 1 (+ (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (pow phi1 2)>
#<alt (* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))>
#<alt (* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))>
#<alt (* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))>
#<alt (pow phi1 2)>
#<alt (* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))>
#<alt (* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))>
#<alt (* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))>
#<alt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))>
#<alt (+ (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (* phi2 (+ (* -2 phi1) (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (* phi2 (+ (* -2 phi1) (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ 1 (+ (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (pow phi2 2)>
#<alt (* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))>
#<alt (* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))>
#<alt (* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))>
#<alt (pow phi2 2)>
#<alt (* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))>
#<alt (* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))>
#<alt (* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))>
#<alt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))>
#<alt (+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))>
#<alt (+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))>
#<alt (+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))>
#<alt (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2)) (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2)) (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))>
#<alt (+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))>
#<alt (+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))>
#<alt (+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))>
#<alt (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2)) (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2)) (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2))>
#<alt (+ (* -1/2 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (* phi1 (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* -1/4 (* phi1 (* (cos phi2) (pow (- lambda1 lambda2) 2)))))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (* phi1 (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2))>
#<alt (+ (* -1/2 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (* phi2 (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* -1/4 (* phi2 (* (cos phi1) (pow (- lambda1 lambda2) 2)))))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (* phi2 (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))>
#<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 (* 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 (+ 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)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (* -1 R)>
#<alt (cos phi2)>
#<alt (+ (cos phi2) (* -1 (* phi1 (sin phi2))))>
#<alt (+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))>
#<alt (+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (- phi2 (* -1 phi1)))>
#<alt (cos (- phi2 (* -1 phi1)))>
#<alt (cos (- phi2 (* -1 phi1)))>
#<alt (cos (- phi2 (* -1 phi1)))>
#<alt (cos phi1)>
#<alt (+ (cos phi1) (* -1 (* phi2 (sin phi1))))>
#<alt (+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))>
#<alt (+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (+ phi1 phi2))>
#<alt (cos (- phi1 (* -1 phi2)))>
#<alt (cos (- phi1 (* -1 phi2)))>
#<alt (cos (- phi1 (* -1 phi2)))>
#<alt (cos (- phi1 (* -1 phi2)))>
#<alt (+ 1/2 (* 1/2 (cos phi2)))>
#<alt (+ 1/2 (+ (* -1/2 (* phi1 (sin phi2))) (* 1/2 (cos phi2))))>
#<alt (+ 1/2 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/4 (* phi1 (cos phi2)))))))>
#<alt (+ 1/2 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* phi1 (+ (* -1/4 (cos phi2)) (* 1/12 (* phi1 (sin phi2)))))))))>
#<alt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))>
#<alt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))>
#<alt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))>
#<alt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))>
#<alt (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))>
#<alt (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))>
#<alt (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))>
#<alt (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))>
#<alt (+ 1/2 (* 1/2 (cos phi1)))>
#<alt (+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (cos phi1))))>
#<alt (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* -1/4 (* phi2 (cos phi1)))))))>
#<alt (+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (cos phi1)) (* 1/12 (* phi2 (sin phi1)))))))))>
#<alt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))>
#<alt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))>
#<alt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))>
#<alt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))>
#<alt (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))>
#<alt (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))>
#<alt (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))>
#<alt (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))>
#<alt (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi1 (* (sin phi2) (- lambda1 lambda2)))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))>
#<alt (+ (* phi1 (+ (* -1/2 (* (sin phi2) (- lambda1 lambda2))) (* -1/4 (* phi1 (* (cos phi2) (- lambda1 lambda2)))))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))>
#<alt (+ (* phi1 (+ (* -1/2 (* (sin phi2) (- lambda1 lambda2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- lambda1 lambda2))) (* 1/12 (* phi1 (* (sin phi2) (- lambda1 lambda2)))))))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi2 (* (sin phi1) (- lambda1 lambda2)))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))>
#<alt (+ (* phi2 (+ (* -1/2 (* (sin phi1) (- lambda1 lambda2))) (* -1/4 (* phi2 (* (cos phi1) (- lambda1 lambda2)))))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))>
#<alt (+ (* phi2 (+ (* -1/2 (* (sin phi1) (- lambda1 lambda2))) (* phi2 (+ (* -1/4 (* (cos phi1) (- lambda1 lambda2))) (* 1/12 (* phi2 (* (sin phi1) (- lambda1 lambda2)))))))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))>
#<alt (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))>
#<alt (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))>
#<alt (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))>
#<alt (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))>
#<alt (* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))>
Calls

198 calls:

TimeVariablePointExpression
16.0ms
phi2
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
9.0ms
phi1
@0
(* R (sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))))
2.0ms
R
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
2.0ms
phi2
@0
(* R (sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))))
2.0ms
R
@0
(* R (sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))))

rewrite775.0ms (4.5%)

Algorithm
1×batch-egg-rewrite
Rules
3334×*-lowering-*.f32
3334×*-lowering-*.f64
2908×/-lowering-/.f32
2908×/-lowering-/.f64
2332×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
039211
1174193
21430190
08604190
Stop Event
1×iter limit
1×node limit
Counts
25 → 508
Calls
Call 1
Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (* (- lambda1 lambda2) (cos (* 1/2 phi2))) (* (- lambda1 lambda2) (cos (* 1/2 phi2)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (* 1/2 phi2)))
(- lambda1 lambda2)
(- 0 (* R phi1))
(* R phi1)
(* (* R lambda2) (cos (* 1/2 phi1)))
(* R lambda2)
(cos (* 1/2 phi1))
(* 1/2 phi1)
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
(+ phi1 phi2)
(* R (sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))))
(sqrt (+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2)))))
(+ (* (- phi1 phi2) (- phi1 phi2)) (* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))))
(* (- lambda1 lambda2) (* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2)))
(cos (* 1/2 phi2))
(* 1/2 phi2)
(* (neg R) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(neg R)
(cos (* (+ phi1 phi2) 1))
(+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1))))
(* (+ 1/2 (* 1/2 (cos (* (+ phi1 phi2) 1)))) (- lambda1 lambda2))
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)) R)
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.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) phi2))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(sqrt.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2)))))) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))))))))
(/.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.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 #s(literal 1/2 binary64) phi2))) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(*.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))))))) #s(literal 1/2 binary64)))
(*.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2)))))))))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(*.f64 (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 1 binary64)))
(fma.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1)) (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1 binary64))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))) (/.f64 (*.f64 lambda2 lambda2) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 #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 (*.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 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 (-.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 (+.f64 (neg.f64 (*.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))))))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R phi1) (/.f64 (*.f64 R phi1) (*.f64 R phi1))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 R phi1)) (*.f64 R phi1))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))) (/.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))))
(fma.f64 R (neg.f64 phi1) #s(literal 0 binary64))
(fma.f64 phi1 (-.f64 #s(literal 0 binary64) R) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) R) phi1 #s(literal 0 binary64))
(fma.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))) (/.f64 #s(literal 1 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (*.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 (neg.f64 phi1) R #s(literal 0 binary64))
(neg.f64 (*.f64 R phi1))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 R phi1) (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))))
(/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))
(/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 R phi1) (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 R phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))))
(/.f64 (neg.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))) (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(/.f64 (neg.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))) (neg.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))) #s(literal 0 binary64)) (+.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) #s(literal 0 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 R phi1) (/.f64 (*.f64 R phi1) (*.f64 R phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (/.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))) (+.f64 (*.f64 (*.f64 (*.f64 R phi1) (/.f64 (*.f64 R phi1) (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (/.f64 (*.f64 R phi1) (*.f64 R phi1)))) (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R phi1) (/.f64 (*.f64 R phi1) (*.f64 R phi1)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 0 binary64) (*.f64 R phi1)) #s(literal 3 binary64)) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))) (+.f64 (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 R phi1)) (/.f64 #s(literal 0 binary64) (*.f64 R phi1))) (+.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (/.f64 #s(literal 0 binary64) (*.f64 R phi1)) (*.f64 R phi1)))))
(pow.f64 (/.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 R phi1) (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))) #s(literal -1 binary64))
(*.f64 R (neg.f64 phi1))
(*.f64 phi1 (-.f64 #s(literal 0 binary64) R))
(*.f64 (-.f64 #s(literal 0 binary64) R) phi1)
(*.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))) (/.f64 #s(literal 1 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 #s(literal -1 binary64) (*.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 (neg.f64 phi1) R)
(+.f64 #s(literal 0 binary64) (*.f64 R phi1))
(+.f64 (*.f64 R phi1) #s(literal 0 binary64))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 R phi1)) (/.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1))))
(fma.f64 R phi1 #s(literal 0 binary64))
(fma.f64 phi1 R #s(literal 0 binary64))
(/.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1))))
(/.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) #s(literal 0 binary64)) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))
(*.f64 R phi1)
(*.f64 phi1 R)
(*.f64 (/.f64 R R) (/.f64 (*.f64 phi1 (*.f64 R phi1)) phi1))
(*.f64 (/.f64 R phi1) (/.f64 (*.f64 phi1 (*.f64 R phi1)) R))
(*.f64 (/.f64 phi1 R) (/.f64 (*.f64 R (*.f64 R phi1)) phi1))
(*.f64 (/.f64 phi1 phi1) (/.f64 (*.f64 R (*.f64 R phi1)) R))
(*.f64 (/.f64 (*.f64 R phi1) R) (/.f64 (*.f64 R phi1) phi1))
(*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R))
(*.f64 (/.f64 (*.f64 phi1 phi1) R) (/.f64 (*.f64 R R) phi1))
(*.f64 (/.f64 (*.f64 R R) phi1) (/.f64 (*.f64 phi1 phi1) R))
(*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R))
(*.f64 (/.f64 (*.f64 R R) R) (/.f64 (*.f64 phi1 phi1) phi1))
(*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1))
(*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R))
(*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.f64 R phi1))
(*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) phi1) (/.f64 R R))
(*.f64 R (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 lambda2 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) R)
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) R) lambda2)
(*.f64 R lambda2)
(*.f64 lambda2 R)
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(*.f64 #s(literal 1/2 binary64) phi1)
(*.f64 phi1 #s(literal 1/2 binary64))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) lambda2)
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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) phi2) (*.f64 #s(literal 1/2 binary64) phi1))
(+.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))
(-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))))
(fma.f64 #s(literal 1/2 binary64) phi2 (*.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 #s(literal 1/2 binary64) phi2))
(fma.f64 phi2 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))
(/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 #s(literal 1/8 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2))
(/.f64 (*.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) #s(literal 1/2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 phi1 phi2))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 #s(literal 1/8 binary64) (*.f64 phi2 (*.f64 phi2 phi2))))) (neg.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (neg.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (neg.f64 (-.f64 phi1 phi2)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) #s(literal 1/2 binary64))) (neg.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1/2 binary64))) (neg.f64 (-.f64 phi1 phi2)))
(/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 phi2 (*.f64 phi2 phi2))) (*.f64 #s(literal 1/8 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (*.f64 #s(literal 1/2 binary64) phi1)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(*.f64 (+.f64 phi2 phi1) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (/.f64 #s(literal 1/2 binary64) (-.f64 phi1 phi2)))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (+.f64 phi2 phi1))
(*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(+.f64 phi2 phi1)
(+.f64 phi1 phi2)
(+.f64 (*.f64 #s(literal 1 binary64) phi2) (*.f64 #s(literal 1 binary64) phi1))
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) phi2))
(+.f64 (*.f64 phi2 #s(literal 1 binary64)) (*.f64 phi1 #s(literal 1 binary64)))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 phi2 #s(literal 1 binary64)))
(-.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2)) (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)))
(-.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi2 phi1)) (/.f64 (*.f64 phi1 phi1) (-.f64 phi2 phi1)))
(fma.f64 phi2 #s(literal 1 binary64) (*.f64 phi1 #s(literal 1 binary64)))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 phi2 #s(literal 1 binary64)))
(fma.f64 #s(literal 1 binary64) phi2 (*.f64 #s(literal 1 binary64) phi1))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 #s(literal 1 binary64) phi2))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))
(/.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi1))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2))
(/.f64 (neg.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (neg.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (neg.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (neg.f64 (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi1)))))
(/.f64 (neg.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (neg.f64 (-.f64 phi1 phi2)))
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (-.f64 phi2 phi1))
(/.f64 (*.f64 #s(literal 1 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 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 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1 binary64)) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (*.f64 phi2 phi2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (neg.f64 (neg.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (neg.f64 (neg.f64 (-.f64 phi1 phi2))))
(/.f64 (neg.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (neg.f64 (-.f64 phi2 phi1)))
(/.f64 (neg.f64 (*.f64 #s(literal 1 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 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 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 binary64))) (neg.f64 (-.f64 phi1 phi2)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) phi2) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) phi1) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) phi2) (*.f64 #s(literal 1 binary64) phi2)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) phi1)) (*.f64 (*.f64 #s(literal 1 binary64) phi2) (*.f64 #s(literal 1 binary64) phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1 binary64) phi1) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1 binary64) phi2) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal 1 binary64) phi2) (*.f64 #s(literal 1 binary64) phi2)) (*.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 #s(literal 1 binary64) phi2)))))
(/.f64 (+.f64 (pow.f64 (*.f64 phi2 #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 phi1 #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 phi2 #s(literal 1 binary64)) (*.f64 phi2 #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 phi1 #s(literal 1 binary64))) (*.f64 (*.f64 phi2 #s(literal 1 binary64)) (*.f64 phi1 #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 phi1 #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 phi2 #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 phi1 #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 phi2 #s(literal 1 binary64)) (*.f64 phi2 #s(literal 1 binary64))) (*.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 phi2 #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2)) (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (+.f64 (*.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)) (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2))) (*.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2)) (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64))
(*.f64 (+.f64 phi2 phi1) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))
(*.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))
(*.f64 (/.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (/.f64 (-.f64 phi1 phi2) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 phi2 phi1))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 (/.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (-.f64 phi1 phi2) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(*.f64 (/.f64 (+.f64 phi2 phi1) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (/.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(*.f64 (/.f64 (+.f64 phi2 phi1) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 phi1 phi2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (+.f64 phi2 phi1))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)))) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))
(*.f64 (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) R)
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
(/.f64 (hypot.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3/2 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (hypot.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3/2 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (sqrt.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3/2 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) #s(literal 1/2 binary64))
(*.f64 (hypot.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3/2 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.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 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3/2 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(*.f64 (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(-.f64 (/.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1)) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1)) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1)) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1)) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 phi2 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi2 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 phi2 phi1) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 phi2 phi1) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi2 phi1) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 phi2 phi1) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 phi2 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi2 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 phi2 phi1) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 phi2 phi1) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi2 phi1) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 phi2 phi1) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 phi2 phi1)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 phi2 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 phi2 phi1)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 phi2 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 phi2 phi1)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 phi2 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 phi2 phi1)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 phi2 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 phi2 phi1)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 phi2 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 phi2 phi1)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 phi2 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))) (+.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 phi2 phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (+.f64 phi2 phi1) (+.f64 phi2 phi1))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 phi2 phi1)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 phi2 phi1)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 phi1 phi2)))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 phi2 phi1)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 phi2 phi1)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (*.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) (*.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))))) (neg.f64 (neg.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (/.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (*.f64 (/.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (*.f64 (/.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.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 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(*.f64 (-.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 lambda1 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(fma.f64 lambda1 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 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 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1)) (-.f64 (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 lambda1 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 lambda1 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 lambda1 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))
(*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(*.f64 #s(literal 1/2 binary64) phi2)
(*.f64 phi2 #s(literal 1/2 binary64))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(neg.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))) (*.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))))
(*.f64 R (neg.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))))
(*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) R)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 lambda2 (-.f64 #s(literal 0 binary64) R)))
(*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) R))
(*.f64 (-.f64 #s(literal 0 binary64) R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))))
(*.f64 (*.f64 lambda2 (-.f64 #s(literal 0 binary64) R)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(*.f64 (*.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) #s(literal -1 binary64)) R)
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) R) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))) lambda2)
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) R))
(-.f64 #s(literal 0 binary64) R)
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 R R) (*.f64 #s(literal 0 binary64) R)))) (/.f64 (*.f64 R (*.f64 R R)) (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 R R) (*.f64 #s(literal 0 binary64) R)))))
(-.f64 (/.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) R)) (/.f64 (*.f64 R R) (+.f64 #s(literal 0 binary64) R)))
(neg.f64 R)
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 R R))) (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 R R) (*.f64 #s(literal 0 binary64) R))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R R)) (+.f64 #s(literal 0 binary64) R))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 R R)))) (neg.f64 (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 R R) (*.f64 #s(literal 0 binary64) R)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 R R))) (neg.f64 (+.f64 #s(literal 0 binary64) R)))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) R) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) R) (-.f64 #s(literal 0 binary64) R)) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) R)))))
(*.f64 R #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) R)
(+.f64 (fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)))) (fma.f64 (neg.f64 (sin.f64 phi1)) (sin.f64 phi2) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(+.f64 (fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)))) (fma.f64 (neg.f64 (sin.f64 phi2)) (sin.f64 phi1) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(+.f64 (*.f64 (cos.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (cos.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)))) (*.f64 (sin.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2))) (sin.f64 (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 phi2)))))
(cos.f64 (+.f64 phi2 phi1))
(-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1)))
(-.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2)))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1 binary64) phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1 binary64) phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1 binary64)))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi1 #s(literal 1 binary64))) (cos.f64 (*.f64 phi2 #s(literal 1 binary64)))) (*.f64 (sin.f64 (*.f64 phi1 #s(literal 1 binary64))) (sin.f64 (*.f64 phi2 #s(literal 1 binary64)))))
(fma.f64 (cos.f64 phi2) (cos.f64 phi1) (neg.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1))))
(fma.f64 (cos.f64 phi1) (cos.f64 phi2) (neg.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (cos.f64 phi2) (cos.f64 phi1))) (+.f64 (*.f64 (*.f64 (sin.f64 phi2) (sin.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))) (*.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (cos.f64 phi1) (cos.f64 phi2))) (+.f64 (*.f64 (*.f64 (sin.f64 phi1) (sin.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))) (*.f64 (*.f64 (cos.f64 phi1) (cos.f64 phi2)) (*.f64 (sin.f64 phi1) (sin.f64 phi2))))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))
(-.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))) (/.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))))
(fma.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64))
(fma.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))))
(/.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))))))
(/.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) #s(literal 1/4 binary64)) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) #s(literal 1/4 binary64))) (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (/.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(pow.f64 (/.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))))))
(*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 (+.f64 (cos.f64 (+.f64 phi2 phi1)) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) lambda1) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(+.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(fma.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(fma.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)))
(fma.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) lambda1 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64)))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 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 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 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 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))))) (neg.f64 (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))))) (neg.f64 (*.f64 (+.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64)))) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (+.f64 lambda1 lambda2))))
(/.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (neg.f64 (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 1/8 binary64) (pow.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 3 binary64))) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) #s(literal 1/2 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1/4 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))))) (-.f64 lambda1 lambda2))) (neg.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64)) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) lambda1) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) lambda1)) (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) lambda1) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (-.f64 lambda1 lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (-.f64 lambda1 lambda2))

simplify560.0ms (3.3%)

Algorithm
1×egg-herbie
Rules
6992×*-lowering-*.f32
6992×*-lowering-*.f64
3256×+-lowering-+.f64
3256×+-lowering-+.f32
1866×*-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0169616680
1601915185
0815715185
Stop Event
1×iter limit
1×node limit
Counts
792 → 792
Calls
Call 1
Inputs
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2))))))))
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2)))))))))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda1)) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (cos (* 1/2 phi2)))
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2))))))))
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2)))))))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda2)) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(* lambda1 (cos (* 1/2 phi2)))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (cos (* 1/2 phi2)))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(* lambda1 (cos (* 1/2 phi2)))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(- lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi2 2) (- lambda1 lambda2)))) lambda2)
(- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi2 2) (- lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R lambda2)
(+ (* -1/8 (* R (* lambda2 (pow phi1 2)))) (* R lambda2))
(+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))
(+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* R (* lambda2 (pow phi1 2)))) (* 1/384 (* R lambda2)))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
1
(+ 1 (* -1/8 (pow phi1 2)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(cos (* 1/2 phi1))
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 1/2 phi1)
(* 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))))
(* 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)))))
(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)))
phi2
(+ phi1 phi2)
(+ phi1 phi2)
(+ phi1 phi2)
phi1
(* phi1 (+ 1 (/ phi2 phi1)))
(* phi1 (+ 1 (/ phi2 phi1)))
(* phi1 (+ 1 (/ phi2 phi1)))
phi1
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
phi1
(+ phi1 phi2)
(+ phi1 phi2)
(+ phi1 phi2)
phi2
(* phi2 (+ 1 (/ phi1 phi2)))
(* phi2 (+ 1 (/ phi1 phi2)))
(* phi2 (+ 1 (/ phi1 phi2)))
phi2
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* 1/12 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* 1/12 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))))
(* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))
(* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))
(* -1 (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (pow (- phi1 phi2) 2)) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (* R (pow (- phi1 phi2) 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda1)) (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))))
(* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))
(* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))
(* -1 (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (pow (- phi1 phi2) 2)) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (* R (pow (- phi1 phi2) 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda2)) (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* 1/12 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* 1/12 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))))
(* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))))
(* -1 (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))
(* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1/2 (* (/ (pow (- phi1 phi2) 2) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)))))
(* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (pow (- phi1 phi2) 2))) (* 1/2 (* (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda1)) (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)))))
(sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))))
(* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))))
(* -1 (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))
(* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1/2 (* (/ (pow (- phi1 phi2) 2) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)))))
(* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (pow (- phi1 phi2) 2))) (* 1/2 (* (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda2)) (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)))))
(+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))
(+ (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (* phi1 (+ (* -2 phi2) (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (* phi1 (+ (* -2 phi2) (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ 1 (+ (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))
(+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))
(+ (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (* phi2 (+ (* -2 phi1) (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (* phi2 (+ (* -2 phi1) (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ 1 (+ (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))
(+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))
(+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2)) (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2)) (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))
(+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2)) (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2)) (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2))))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2))))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2))
(+ (* -1/2 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))
(+ (* phi1 (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* -1/4 (* phi1 (* (cos phi2) (pow (- lambda1 lambda2) 2)))))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))
(+ (* phi1 (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2))
(+ (* -1/2 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))
(+ (* phi2 (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* -1/4 (* phi2 (* (cos phi1) (pow (- lambda1 lambda2) 2)))))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))
(+ (* phi2 (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))
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 (* 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 (+ 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)
(* -1 R)
(* -1 R)
(* -1 R)
(* -1 R)
(* -1 R)
(* -1 R)
(* -1 R)
(* -1 R)
(* -1 R)
(* -1 R)
(* -1 R)
(cos phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos (- phi2 (* -1 phi1)))
(cos phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (+ phi1 phi2))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(cos (- phi1 (* -1 phi2)))
(+ 1/2 (* 1/2 (cos phi2)))
(+ 1/2 (+ (* -1/2 (* phi1 (sin phi2))) (* 1/2 (cos phi2))))
(+ 1/2 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/4 (* phi1 (cos phi2)))))))
(+ 1/2 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* phi1 (+ (* -1/4 (cos phi2)) (* 1/12 (* phi1 (sin phi2)))))))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+ 1/2 (* 1/2 (cos phi1)))
(+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (cos phi1))))
(+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* -1/4 (* phi2 (cos phi1)))))))
(+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (cos phi1)) (* 1/12 (* phi2 (sin phi1)))))))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))
(* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2))
(+ (* -1/2 (* phi1 (* (sin phi2) (- lambda1 lambda2)))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin phi2) (- lambda1 lambda2))) (* -1/4 (* phi1 (* (cos phi2) (- lambda1 lambda2)))))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin phi2) (- lambda1 lambda2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- lambda1 lambda2))) (* 1/12 (* phi1 (* (sin phi2) (- lambda1 lambda2)))))))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin phi1) (- lambda1 lambda2)))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin phi1) (- lambda1 lambda2))) (* -1/4 (* phi2 (* (cos phi1) (- lambda1 lambda2)))))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin phi1) (- lambda1 lambda2))) (* phi2 (+ (* -1/4 (* (cos phi1) (- lambda1 lambda2))) (* 1/12 (* phi2 (* (sin phi1) (- lambda1 lambda2)))))))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))
(* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))
(* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))
(* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))
Outputs
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.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) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda1) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R lambda1) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 R (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))
(*.f64 lambda1 (-.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))
(*.f64 lambda1 (-.f64 (+.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) 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) phi2))) lambda1)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))) lambda1)))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda1)) (* R (* lambda2 (cos (* 1/2 phi2))))) lambda1)) (* R (cos (* 1/2 phi2))))))
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) lambda1)))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.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) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 R (*.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)))))) (*.f64 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) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))))
(*.f64 lambda2 (-.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda2 lambda2))))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 phi2))))) (* R (cos (* 1/2 phi2)))))))
(*.f64 lambda2 (-.f64 (+.f64 (+.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) 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) phi2)) (*.f64 lambda2 lambda2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 phi2))))) lambda2)) (* R (* lambda1 (cos (* 1/2 phi2))))) lambda2)) (* R (cos (* 1/2 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2)) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) lambda2)))
(* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))
(-.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 (*.f64 R (*.f64 phi2 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R phi2) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (*.f64 R phi1)))))
(+ (* R (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (* phi2 (+ (* -1 (* (* R phi1) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 (*.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (*.f64 R (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (*.f64 R phi1)))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi2 phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 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) 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) 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 #s(literal 0 binary64) (*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 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) 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 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 #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) 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) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2))) phi2)) phi2)))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))
(+ (* -1 (* (* R (* phi1 phi2)) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) (*.f64 (*.f64 R (*.f64 phi2 phi1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))))))) (*.f64 (*.f64 R phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* -1 (* (* R phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))) (* 1/2 (* (* R (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 (*.f64 phi2 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))))) (*.f64 (*.f64 R phi2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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 phi2)) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 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) 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) 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 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 #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) 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)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 #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) 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) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))) phi1)) phi1)))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (-.f64 (*.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) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64))))))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2))))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 phi2)))))))))
(*.f64 lambda1 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 (-.f64 phi1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 phi1 phi2) (*.f64 lambda1 lambda1)))))))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(*.f64 (neg.f64 lambda1) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(*.f64 (neg.f64 lambda1) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))) lambda1)))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda1)) (* lambda2 (cos (* 1/2 phi2)))) lambda1)))))
(*.f64 (neg.f64 lambda1) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) lambda1)))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 phi2)) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda1)))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 phi2)) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 phi2)) 2) (- (pow (cos (* 1/2 phi2)) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 phi2)) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) lambda1)))))
(* lambda2 (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)))
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2))))))))
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda2 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi2)) (+ (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 phi2)))))))))
(*.f64 lambda2 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 lambda1 (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda2 lambda2)))))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 phi2))))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 phi2))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 phi2))))) lambda2)) (* lambda1 (cos (* 1/2 phi2)))) lambda2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) lambda2)))
(sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 (-.f64 lambda1 lambda2) phi1)
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))
(-.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (*.f64 (*.f64 phi2 phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))) (*.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))))
(+ (sqrt (+ (pow phi1 2) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1 (* phi1 (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* phi1 (* phi2 (- (+ 1 (* -1/4 (pow (- lambda1 lambda2) 2))) (/ (pow phi1 2) (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (pow (+ (pow phi1 2) (pow (- lambda1 lambda2) 2)) 3))))))))))
(+.f64 (hypot.f64 (-.f64 lambda1 lambda2) phi1) (*.f64 phi2 (-.f64 (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (*.f64 (*.f64 (*.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) #s(literal -1/4 binary64)) (/.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)) (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1)))))))))) (*.f64 phi1 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (*.f64 phi2 phi2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))) (/.f64 phi1 phi2))))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) phi1) phi2))) phi2)) phi2)))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* -1 (* (* phi1 phi2) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))) (*.f64 (*.f64 phi2 phi1) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))) (*.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* -1 (* phi2 (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* phi1 (* phi2 (- 1 (/ (pow phi2 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))) (*.f64 (*.f64 (*.f64 phi2 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2)) #s(literal 3 binary64)))))))) (*.f64 phi2 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 phi2))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi2 phi1) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) 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) phi2)) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (/.f64 phi2 phi1))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 phi2)) 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) 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)) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))) phi1)) phi1)))
(* -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)))) (* lambda1 (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1))))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1)
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 phi2)))) (* lambda1 (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1/8 (* (pow phi2 2) (- lambda1 lambda2)))) lambda2)
(+.f64 lambda1 (-.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/8 binary64)) (-.f64 lambda1 lambda2)) lambda2))
(- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* 1/384 (* (pow phi2 2) (- lambda1 lambda2)))))) lambda2)
(+.f64 lambda1 (-.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/384 binary64)) (-.f64 lambda1 lambda2)))) lambda2))
(- (+ lambda1 (* (pow phi2 2) (+ (* -1/8 (- lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (- lambda1 lambda2))) (* 1/384 (- lambda1 lambda2))))))) lambda2)
(+.f64 lambda1 (-.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/46080 binary64)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal 1/384 binary64)))))) lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.f64 #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)))
(* -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))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R lambda2)
(*.f64 R lambda2)
(+ (* -1/8 (* R (* lambda2 (pow phi1 2)))) (* R lambda2))
(+.f64 (*.f64 R lambda2) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 R lambda2) (*.f64 phi1 phi1))))
(+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))
(+.f64 (*.f64 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* (pow phi1 2) (+ (* -1/46080 (* R (* lambda2 (pow phi1 2)))) (* 1/384 (* R lambda2)))))))
(+.f64 (*.f64 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 #s(literal 1/384 binary64) (*.f64 R lambda2)))))))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R (* lambda2 (cos (* 1/2 phi1))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi1 2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64)))
(+ 1 (* (pow phi1 2) (- (* 1/384 (pow phi1 2)) 1/8)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))
(+ 1 (* (pow phi1 2) (- (* (pow phi1 2) (+ 1/384 (* -1/46080 (pow phi1 2)))) 1/8)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)
(+ (* -1/2 (* lambda2 (* phi1 (sin (* 1/2 phi2))))) (* lambda2 (cos (* 1/2 phi2))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) (*.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) (*.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 (*.f64 lambda2 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/48 binary64)))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (- phi2 (* -1 phi1)))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* 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 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))))
(* lambda2 (cos (* 1/2 (- phi1 (* -1 phi2)))))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 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 #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 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/8 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1)))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #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 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi2) phi1) #s(literal -1/2 binary64)))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(* 1/2 phi2)
(*.f64 #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 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64)))
phi2
(+ phi1 phi2)
(+.f64 phi2 phi1)
(+ phi1 phi2)
(+.f64 phi2 phi1)
(+ phi1 phi2)
(+.f64 phi2 phi1)
phi1
(* phi1 (+ 1 (/ phi2 phi1)))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (/ phi2 phi1)))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (/ phi2 phi1)))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
phi1
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)))
phi1
(+ phi1 phi2)
(+.f64 phi2 phi1)
(+ phi1 phi2)
(+.f64 phi2 phi1)
(+ phi1 phi2)
(+.f64 phi2 phi1)
phi2
(* phi2 (+ 1 (/ phi1 phi2)))
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (/ phi1 phi2)))
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (/ phi1 phi2)))
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
phi2
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi1 phi2)) #s(literal -1 binary64)))
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi1 phi2)) #s(literal -1 binary64)))
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi1 phi2)) #s(literal -1 binary64)))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi1) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))))
(+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (*.f64 (*.f64 R phi1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (*.f64 R (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))
(+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* 1/12 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (*.f64 R (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (*.f64 (*.f64 R phi1) (+.f64 (*.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 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 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)) (/.f64 R phi1)))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R phi2) (*.f64 phi1 phi1)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)) (/.f64 R phi1)))) (/.f64 (*.f64 R phi2) phi1))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 R (*.f64 phi2 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))) phi1)) phi1)))
(* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi2) (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))))
(+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (*.f64 (*.f64 R phi2) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (*.f64 R (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))))
(+ (* R (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* 1/12 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (*.f64 R (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (*.f64 (*.f64 R phi2) (+.f64 (*.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 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 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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 R phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R phi1) (*.f64 phi2 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))) (*.f64 (/.f64 R phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) 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 #s(literal 0 binary64) (*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 R (*.f64 phi1 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))) phi2)) phi2)))
(* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 R lambda1) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R lambda1) (*.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 R lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))
(*.f64 lambda1 (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 R lambda2) lambda1))))
(* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 lambda1 (-.f64 (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 R lambda2) lambda1))))
(* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (pow lambda1 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))
(*.f64 lambda1 (-.f64 (+.f64 (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 lambda1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 R lambda2) lambda1))))
(* -1 (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 R lambda1)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (* (/ (* R lambda2) lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 R lambda2) lambda1))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (pow (- phi1 phi2) 2)) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) lambda1)))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (* R (pow (- phi1 phi2) 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda1)) (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 (neg.f64 lambda1) (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)))) lambda1)) lambda1)))
(* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 R lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 lambda1 (*.f64 (*.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 R lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))
(*.f64 lambda2 (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 R lambda1) lambda2))))
(* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 lambda2 (-.f64 (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 R lambda1) lambda2))))
(* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (pow lambda2 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (+ (* 1/2 (* (/ (* R (pow (- phi1 phi2) 2)) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))
(*.f64 lambda2 (-.f64 (+.f64 (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 R lambda1) lambda2))))
(* -1 (* (* R lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))
(*.f64 (*.f64 #s(literal -1 binary64) (*.f64 R lambda2)) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* -1 (* lambda2 (+ (* -1 (* (/ (* R lambda1) lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 R lambda1) lambda2))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (pow (- phi1 phi2) 2)) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (* R (pow (- phi1 phi2) 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda2)) (* (* R lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* R (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2)))) lambda2)) lambda2)))
(sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))))) (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* 1/12 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))) (*.f64 phi1 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi1) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))))) (/.f64 phi2 phi1))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 phi2 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) phi1)))
(sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))))) (*.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))))))
(+ (sqrt (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* 1/12 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) 2) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (*.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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))) (*.f64 phi2 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/12 binary64) (sin.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))))))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (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) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)) (/.f64 phi1 (*.f64 phi2 phi2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.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 (/ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (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)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 phi1 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)) phi2)))
(sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))
(+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))) (*.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))))
(+ (sqrt (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda2 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 3 binary64))))))))) (*.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))))
(* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 lambda1 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 lambda1 (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 lambda2 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))))
(*.f64 lambda1 (+.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 lambda2 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* lambda2 (pow (- phi1 phi2) 2)) (pow lambda1 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda1 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))))
(*.f64 lambda1 (+.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 lambda2 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 lambda2 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)))))))
(* -1 (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))
(*.f64 (neg.f64 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda2 lambda1) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))
(*.f64 (neg.f64 lambda1) (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 lambda2 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1/2 (* (/ (pow (- phi1 phi2) 2) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)))))
(*.f64 (neg.f64 lambda1) (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 lambda2 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) lambda1)))
(* -1 (* lambda1 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (pow (- phi1 phi2) 2))) (* 1/2 (* (/ (* lambda2 (pow (- phi1 phi2) 2)) lambda1) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda1)) (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)))))
(*.f64 (neg.f64 lambda1) (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (-.f64 (*.f64 lambda2 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1)))) lambda1)) lambda1)))
(sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))
(+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (/ (* (pow lambda1 2) (pow (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) 2)) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.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) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (pow.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) #s(literal 2 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) #s(literal 3 binary64))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 lambda2 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))
(*.f64 lambda2 (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 lambda1 lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))))))
(*.f64 lambda2 (+.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 lambda1 lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))))
(* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (+ (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* 1/2 (* (/ (* lambda1 (pow (- phi1 phi2) 2)) (pow lambda2 3)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* 1/2 (* (/ (pow (- phi1 phi2) 2) (pow lambda2 2)) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))))
(*.f64 lambda2 (+.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 lambda1 lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)))))))
(* -1 (* lambda2 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (* (/ lambda1 lambda2) (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (/.f64 lambda1 lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1/2 (* (/ (pow (- phi1 phi2) 2) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))))) (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (+.f64 (*.f64 lambda1 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) lambda2)))
(* -1 (* lambda2 (+ (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (pow (- phi1 phi2) 2))) (* 1/2 (* (/ (* lambda1 (pow (- phi1 phi2) 2)) lambda2) (sqrt (/ 1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))))) lambda2)) (* lambda1 (sqrt (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (-.f64 (*.f64 lambda1 (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2)))) lambda2)) lambda2)))
(+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2))
(+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))))
(+ (* phi1 (+ (* -2 phi2) (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 phi1 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))
(+ (* phi1 (+ (* -2 phi2) (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ 1 (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2)))))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 phi1 (+.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2))))))))
(+ (* phi1 (+ (* -2 phi2) (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ 1 (+ (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))))))) (+ (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))) (*.f64 phi1 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 #s(literal 1/12 binary64) phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi2))))))))))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))))
(pow phi1 2)
(*.f64 phi1 phi1)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 phi2 #s(literal 2 binary64)) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) phi1)) phi1)))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) phi1)) (* 2 phi2)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 phi2 #s(literal 2 binary64)) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) phi1)) phi1)))
(+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2))
(+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))
(+ (* phi2 (+ (* -2 phi1) (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))
(+ (* phi2 (+ (* -2 phi1) (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ 1 (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2)))))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (*.f64 phi2 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))
(+ (* phi2 (+ (* -2 phi1) (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ 1 (+ (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))))))) (+ (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))) (*.f64 phi2 (+.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1)))) (*.f64 phi2 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 (*.f64 #s(literal 1/12 binary64) phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))
(pow phi2 2)
(*.f64 phi2 phi2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) (/.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (+ (/ (* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2)) (pow phi2 2)) (/ (pow phi1 2) (pow phi2 2))))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) (/.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))))
(pow phi2 2)
(*.f64 phi2 phi2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) phi1) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) phi2)) phi2)))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) phi2)) (* 2 phi1)) phi2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) phi1) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) phi2)) phi2)))
(+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))
(+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2)) (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1)) (+.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda1 lambda1))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2)) (/ (pow (- phi1 phi2) 2) (pow lambda1 2)))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1)) (+.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda1 lambda1))))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) lambda1)) lambda1))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) lambda1)) lambda1))))
(+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2))
(+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)))
(+.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2)) (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2)) (+.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 lambda2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (+ (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2)) (/ (pow (- phi1 phi2) 2) (pow lambda2 2)))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2)) (+.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 lambda2))))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2))))
(* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) lambda2)) lambda2))))
(* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (+ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow (- phi1 phi2) 2)) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))) lambda2)) lambda2))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(+ (* lambda1 (+ (* -2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda1 (+.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda1 lambda1))))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda1 2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda1 lambda1))))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (pow lambda1 2) (+ 1/2 (+ (* -2 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1)) lambda1))))
(* (pow lambda1 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 2 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1)) lambda1))))
(* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+ (* -2 (* lambda1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 #s(literal -2 binary64) (*.f64 (*.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(+ (* lambda2 (+ (* -2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(+.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 lambda2))))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (cos (+ phi1 phi2))) (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (pow lambda2 2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 lambda2))))))
(* (pow lambda2 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (pow lambda2 2) (+ 1/2 (+ (* -2 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 (*.f64 #s(literal -2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2))))
(* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2)) lambda2))))
(* (pow lambda2 2) (+ 1/2 (+ (* -1 (/ (+ (* -1 (/ (* (pow lambda1 2) (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 2 (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))) lambda2)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (*.f64 lambda2 lambda2) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (/.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2)) lambda2))))
(* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))
(+ (* -1/2 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi2))))
(+ (* phi1 (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* -1/4 (* phi1 (* (cos phi2) (pow (- lambda1 lambda2) 2)))))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(+ (* phi1 (+ (* -1/2 (* (sin phi2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* -1/4 (* (cos phi2) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi1 (* (sin phi2) (pow (- lambda1 lambda2) 2)))))))) (* (+ 1/2 (* 1/2 (cos phi2))) (pow (- lambda1 lambda2) 2)))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (cos.f64 phi2))) (*.f64 (*.f64 #s(literal 1/12 binary64) phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi2))))))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))
(+ (* -1/2 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))
(+ (* phi2 (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* -1/4 (* phi2 (* (cos phi1) (pow (- lambda1 lambda2) 2)))))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 phi2 (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))
(+ (* phi2 (+ (* -1/2 (* (sin phi1) (pow (- lambda1 lambda2) 2))) (* phi2 (+ (* -1/4 (* (cos phi1) (pow (- lambda1 lambda2) 2))) (* 1/12 (* phi2 (* (sin phi1) (pow (- lambda1 lambda2) 2)))))))) (* (+ 1/2 (* 1/2 (cos phi1))) (pow (- lambda1 lambda2) 2)))
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/12 binary64) phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (sin.f64 phi1))))))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (pow (- lambda1 lambda2) 2))
(*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi2 2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal -1/8 binary64)))
(+ 1 (* (pow phi2 2) (- (* 1/384 (pow phi2 2)) 1/8)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/384 (* -1/46080 (pow phi2 2)))) 1/8)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(* 1/2 phi2)
(*.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 (* 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 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 phi2 phi1)))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R 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 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/8 binary64)))))) (*.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 phi2 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 phi2 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 phi2 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 phi2 phi1)))))
(* -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 phi2 phi1)))))
(* -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 phi2 phi1)))))
(* -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 phi2 phi1)))))
(* -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 phi2 phi1)))))
(* -1 (* R (* lambda2 (cos (* 1/2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* 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 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/8 binary64)))))) (*.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 phi2 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 phi2 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 phi2 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 phi2 phi1)))))
(* -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 phi2 phi1)))))
(* -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 phi2 phi1)))))
(* -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 phi2 phi1)))))
(* -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 phi2 phi1)))))
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(* -1 R)
(-.f64 #s(literal 0 binary64) R)
(cos phi2)
(cos.f64 phi2)
(+ (cos phi2) (* -1 (* phi1 (sin phi2))))
(-.f64 (cos.f64 phi2) (*.f64 phi1 (sin.f64 phi2)))
(+ (cos phi2) (* phi1 (- (* -1/2 (* phi1 (cos phi2))) (sin phi2))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (cos.f64 phi2))) (sin.f64 phi2))))
(+ (cos phi2) (* phi1 (- (* phi1 (+ (* -1/2 (cos phi2)) (* 1/6 (* phi1 (sin phi2))))) (sin phi2))))
(+.f64 (cos.f64 phi2) (*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/6 binary64) phi1) (sin.f64 phi2)))) (sin.f64 phi2))))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi2 (* -1 phi1)))
(cos.f64 (+.f64 phi2 phi1))
(cos phi1)
(cos.f64 phi1)
(+ (cos phi1) (* -1 (* phi2 (sin phi1))))
(-.f64 (cos.f64 phi1) (*.f64 phi2 (sin.f64 phi1)))
(+ (cos phi1) (* phi2 (- (* -1/2 (* phi2 (cos phi1))) (sin phi1))))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (cos.f64 phi1))) (sin.f64 phi1))))
(+ (cos phi1) (* phi2 (- (* phi2 (+ (* -1/2 (cos phi1)) (* 1/6 (* phi2 (sin phi1))))) (sin phi1))))
(+.f64 (cos.f64 phi1) (*.f64 phi2 (-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (cos.f64 phi1)) (*.f64 #s(literal 1/6 binary64) (*.f64 phi2 (sin.f64 phi1))))) (sin.f64 phi1))))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (+ phi1 phi2))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(cos (- phi1 (* -1 phi2)))
(cos.f64 (+.f64 phi2 phi1))
(+ 1/2 (* 1/2 (cos phi2)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))
(+ 1/2 (+ (* -1/2 (* phi1 (sin phi2))) (* 1/2 (cos phi2))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 phi2))))
(+ 1/2 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* -1/4 (* phi1 (cos phi2)))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 #s(literal -1/4 binary64) (*.f64 phi1 (cos.f64 phi2))))))
(+ 1/2 (+ (* 1/2 (cos phi2)) (* phi1 (+ (* -1/2 (sin phi2)) (* phi1 (+ (* -1/4 (cos phi2)) (* 1/12 (* phi1 (sin phi2)))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi2)) (*.f64 (*.f64 #s(literal 1/12 binary64) phi1) (sin.f64 phi2)))))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos phi1)))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))
(+ 1/2 (+ (* -1/2 (* phi2 (sin phi1))) (* 1/2 (cos phi1))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (sin.f64 phi1)))) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))
(+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* -1/4 (* phi2 (cos phi1)))))))
(+.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (*.f64 #s(literal -1/4 binary64) (*.f64 phi2 (cos.f64 phi1)))))))
(+ 1/2 (+ (* 1/2 (cos phi1)) (* phi2 (+ (* -1/2 (sin phi1)) (* phi2 (+ (* -1/4 (cos phi1)) (* 1/12 (* phi2 (sin phi1)))))))))
(+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (*.f64 #s(literal 1/12 binary64) (*.f64 phi2 (sin.f64 phi1))))))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (+ phi1 phi2))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2)))))
(+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))
(* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2))))
(+ (* -1/2 (* phi1 (* (sin phi2) (- lambda1 lambda2)))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 phi2))))
(+ (* phi1 (+ (* -1/2 (* (sin phi2) (- lambda1 lambda2))) (* -1/4 (* phi1 (* (cos phi2) (- lambda1 lambda2)))))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (-.f64 lambda1 lambda2)) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 phi1 (cos.f64 phi2)) (-.f64 lambda1 lambda2))))))
(+ (* phi1 (+ (* -1/2 (* (sin phi2) (- lambda1 lambda2))) (* phi1 (+ (* -1/4 (* (cos phi2) (- lambda1 lambda2))) (* 1/12 (* phi1 (* (sin phi2) (- lambda1 lambda2)))))))) (* (+ 1/2 (* 1/2 (cos phi2))) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 phi2))) (*.f64 (*.f64 #s(literal 1/12 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 phi2))))))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi2 (* -1 phi1))))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1))))
(+ (* -1/2 (* phi2 (* (sin phi1) (- lambda1 lambda2)))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 phi1))))
(+ (* phi2 (+ (* -1/2 (* (sin phi1) (- lambda1 lambda2))) (* -1/4 (* phi2 (* (cos phi1) (- lambda1 lambda2)))))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/4 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 phi1))))))
(+ (* phi2 (+ (* -1/2 (* (sin phi1) (- lambda1 lambda2))) (* phi2 (+ (* -1/4 (* (cos phi1) (- lambda1 lambda2))) (* 1/12 (* phi2 (* (sin phi1) (- lambda1 lambda2)))))))) (* (+ 1/2 (* 1/2 (cos phi1))) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (cos.f64 phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal 1/12 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 phi1))))))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* (+ 1/2 (* 1/2 (cos (- phi1 (* -1 phi2))))) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(-.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(-.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(-.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1))))
(* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1))))
(* lambda1 (+ 1/2 (+ (* -1 (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1)) (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1))))
(* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda1))))
(*.f64 (neg.f64 lambda1) (-.f64 (/.f64 (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda1) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))
(*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(-.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(-.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(+ (* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2)))))) (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(-.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) (*.f64 lambda2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* lambda2 (+ (* -1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(* -1 (* lambda2 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))
(* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2))))
(* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2))))
(* -1 (* lambda2 (+ 1/2 (+ (* -1 (/ (* lambda1 (+ 1/2 (* 1/2 (cos (+ phi1 phi2))))) lambda2)) (* 1/2 (cos (+ phi1 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))) (/.f64 (*.f64 lambda1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))) lambda2))))

eval301.0ms (1.8%)

Compiler

Compiled 51979 to 5403 computations (89.6% saved)

prune243.0ms (1.4%)

Pruning

53 alts after pruning (49 fresh and 4 done)

PrunedKeptTotal
New1462301492
Fresh111930
Picked325
Done123
Total1477531530
Accuracy
99.4%
Counts
1530 → 53
Alt Table
Click to see full alt table
StatusAccuracyProgram
7.3%
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
15.6%
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 R phi1) (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))))
16.8%
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.f64 R phi1)))
20.4%
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
29.8%
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
18.9%
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
32.1%
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
9.6%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
8.2%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
▶21.2%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
58.2%
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
▶16.1%
(+.f64 (*.f64 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
32.0%
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
32.2%
(*.f64 (-.f64 (*.f64 R (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (neg.f64 lambda1))
32.2%
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (neg.f64 lambda1))
30.8%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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))
30.8%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (neg.f64 lambda1))
16.0%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (exp.f64 (*.f64 (log.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))) #s(literal -1 binary64)))) (neg.f64 lambda1))
46.9%
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
12.7%
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
19.8%
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
18.3%
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
29.0%
(*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
✓20.8%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
12.5%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
8.7%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
8.9%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
32.1%
(*.f64 (neg.f64 phi1) R)
9.6%
(*.f64 (neg.f64 R) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
15.3%
(*.f64 (neg.f64 R) (*.f64 lambda2 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
15.3%
(*.f64 (neg.f64 R) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
8.2%
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
56.9%
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
8.9%
(*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
63.4%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
63.3%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
▶85.3%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
✓91.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
✓91.5%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
76.0%
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
46.9%
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))))
28.1%
(*.f64 R (*.f64 (neg.f64 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
21.2%
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
19.7%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
21.1%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
54.0%
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
47.5%
(*.f64 R (*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
▶32.9%
(*.f64 R (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
27.5%
(*.f64 R (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi2 phi1) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 phi2 phi1) (+.f64 lambda1 lambda2)))))
57.2%
(*.f64 R (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) (-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (-.f64 lambda1 lambda2))))))
42.7%
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))
✓33.5%
(*.f64 R phi2)
▶22.8%
(*.f64 R lambda2)
Compiler

Compiled 2551 to 1502 computations (41.1% saved)

simplify187.0ms (1.1%)

Algorithm
1×egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
✓cost-diff6400
(-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))
✓cost-diff6400
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)))
✓cost-diff6400
(*.f64 R (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
✓cost-diff0
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
✓cost-diff0
(*.f64 R lambda1)
✓cost-diff0
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
✓cost-diff0
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
✓cost-diff0
(*.f64 R lambda2)
✓cost-diff256
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))
✓cost-diff256
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1)))))
✓cost-diff256
(+.f64 (*.f64 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
✓cost-diff0
(*.f64 R lambda2)
✓cost-diff0
(-.f64 lambda1 lambda2)
✓cost-diff0
(*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
✓cost-diff0
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))
✓cost-diff0
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
Rules
3820×*-lowering-*.f32
3820×*-lowering-*.f64
2848×+-lowering-+.f64
2848×+-lowering-+.f32
1678×fma-define
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
043295
1118291
2410281
31847273
08423273
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))
(- lambda1 lambda2)
lambda1
lambda2
(+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))
(cos (* 1/2 phi1))
(* 1/2 phi1)
1/2
phi1
(* (* -1/2 phi2) (sin (* 1/2 phi1)))
(* -1/2 phi2)
-1/2
phi2
(sin (* 1/2 phi1))
(- phi1 phi2)
(* R lambda2)
R
lambda2
(+ (* R lambda2) (* (* phi1 phi1) (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1))))))
(* R lambda2)
R
lambda2
(* (* phi1 phi1) (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1)))))
(* phi1 phi1)
phi1
(+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1))))
(* -1/8 (* R lambda2))
-1/8
(* (* 1/384 R) (* lambda2 (* phi1 phi1)))
(* 1/384 R)
1/384
(* lambda2 (* phi1 phi1))
(- 0 (* (* R lambda1) (cos (* 1/2 phi2))))
0
(* (* R lambda1) (cos (* 1/2 phi2)))
(* R lambda1)
R
lambda1
(cos (* 1/2 phi2))
(* 1/2 phi2)
1/2
phi2
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))))
R
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2)))
lambda2
(- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))
(cos (* 1/2 phi2))
(* 1/2 phi2)
1/2
phi2
(/ (* (cos (* 1/2 phi2)) lambda1) lambda2)
(* (cos (* 1/2 phi2)) lambda1)
lambda1
Outputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
1/2
#s(literal 1/2 binary64)
phi1
(* (* -1/2 phi2) (sin (* 1/2 phi1)))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 phi2)
(*.f64 #s(literal -1/2 binary64) phi2)
-1/2
#s(literal -1/2 binary64)
phi2
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(- phi1 phi2)
(-.f64 phi1 phi2)
(* R lambda2)
(*.f64 R lambda2)
R
lambda2
(+ (* R lambda2) (* (* phi1 phi1) (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1))))))
(+.f64 (*.f64 R lambda2) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 R lambda2) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64))))))
(* R lambda2)
(*.f64 R lambda2)
R
lambda2
(* (* phi1 phi1) (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1)))))
(*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 R lambda2) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)))))
(* phi1 phi1)
(*.f64 phi1 phi1)
phi1
(+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1))))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64))))
(* -1/8 (* R lambda2))
(*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))
-1/8
#s(literal -1/8 binary64)
(* (* 1/384 R) (* lambda2 (* phi1 phi1)))
(*.f64 R (*.f64 lambda2 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64))))
(* 1/384 R)
(*.f64 R #s(literal 1/384 binary64))
1/384
#s(literal 1/384 binary64)
(* lambda2 (* phi1 phi1))
(*.f64 lambda2 (*.f64 phi1 phi1))
(- 0 (* (* R lambda1) (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))
0
#s(literal 0 binary64)
(* (* R lambda1) (cos (* 1/2 phi2)))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R lambda1)
(*.f64 R lambda1)
R
lambda1
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
1/2
#s(literal 1/2 binary64)
phi2
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))))
(*.f64 (*.f64 R lambda2) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 lambda1 lambda2)) #s(literal 1 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
R
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2)))
(*.f64 lambda2 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 lambda1 lambda2)) #s(literal 1 binary64)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
lambda2
(- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 lambda1 lambda2)) #s(literal 1 binary64)) (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
#s(literal 1/2 binary64)
phi2
(/ (* (cos (* 1/2 phi2)) lambda1) lambda2)
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) lambda1)
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
lambda1

localize245.0ms (1.4%)

Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓accuracy99.9%
(*.f64 R (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
✓accuracy99.8%
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1)
✓accuracy99.8%
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)
✓accuracy90.0%
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2)))
✓accuracy100.0%
(*.f64 R lambda1)
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) phi2)
✓accuracy100.0%
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
✓accuracy99.8%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
✓accuracy96.1%
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))
✓accuracy88.6%
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1)))))
✓accuracy87.9%
(*.f64 lambda2 (*.f64 phi1 phi1))
✓accuracy85.2%
(*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1)))
✓accuracy100.0%
(*.f64 R lambda2)
✓accuracy100.0%
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
✓accuracy99.8%
(*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
✓accuracy99.8%
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
✓accuracy97.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
Results
182.0ms256×0valid
Compiler

Compiled 314 to 41 computations (86.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 110.0ms
ival-mult: 68.0ms (61.9% of total)
ival-cos: 11.0ms (10% of total)
compiled-spec: 7.0ms (6.4% of total)
ival-sin: 5.0ms (4.6% of total)
ival-sub: 5.0ms (4.6% of total)
ival-add: 4.0ms (3.6% of total)
...c/correct-round.rkt:119:19: 4.0ms (3.6% of total)
ival-div: 2.0ms (1.8% of total)
ival-sqrt: 2.0ms (1.8% of total)
const: 1.0ms (0.9% of total)
backward-pass: 0.0ms (0% of total)

series162.0ms (0.9%)

Counts
22 → 720
Calls
Call 1
Inputs
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))>
#<alt (- lambda1 lambda2)>
#<alt (* R lambda2)>
#<alt (+ (* R lambda2) (* (* phi1 phi1) (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1))))))>
#<alt (* (* phi1 phi1) (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1)))))>
#<alt (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1))))>
#<alt (- 0 (* (* R lambda1) (cos (* 1/2 phi2))))>
#<alt (* (* R lambda1) (cos (* 1/2 phi2)))>
#<alt (* R lambda1)>
#<alt (cos (* 1/2 phi2))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2)))>
#<alt (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))>
#<alt (* (* -1/2 phi2) (sin (* 1/2 phi1)))>
#<alt (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))>
#<alt (* (* 1/384 R) (* lambda2 (* phi1 phi1)))>
#<alt (* lambda2 (* phi1 phi1))>
#<alt (* 1/2 phi2)>
#<alt (/ (* (cos (* 1/2 phi2)) lambda1) lambda2)>
#<alt (* (cos (* 1/2 phi2)) lambda1)>
Outputs
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))>
#<alt (* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))>
#<alt (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))>
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))>
#<alt (* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))>
#<alt (* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))>
#<alt (* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))>
#<alt (+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))>
#<alt (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))>
#<alt (* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))>
#<alt (* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))>
#<alt (- lambda1 lambda2)>
#<alt (- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)>
#<alt (- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)>
#<alt (- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))>
#<alt (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))>
#<alt (* -1 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 lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R lambda2)>
#<alt (* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))>
#<alt (* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))>
#<alt (* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))>
#<alt (* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))>
#<alt (* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))>
#<alt (* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))>
#<alt (* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))>
#<alt (* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))>
#<alt (* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))>
#<alt (* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))>
#<alt (* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))>
#<alt (* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))>
#<alt (* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))>
#<alt (* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))>
#<alt (* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))>
#<alt (* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))>
#<alt (* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))>
#<alt (* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))>
#<alt (* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))>
#<alt (* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))>
#<alt (* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))>
#<alt (* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))>
#<alt (* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))>
#<alt (* R lambda2)>
#<alt (+ (* -1/8 (* R (* lambda2 (pow phi1 2)))) (* R lambda2))>
#<alt (+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))>
#<alt (+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 4))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 4))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))>
#<alt (* -1/8 (* R (* lambda2 (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 4))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 4))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))>
#<alt (* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))>
#<alt (* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))>
#<alt (* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))>
#<alt (* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))>
#<alt (* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))>
#<alt (* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))>
#<alt (* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))>
#<alt (* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))>
#<alt (* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))>
#<alt (* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))>
#<alt (* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))>
#<alt (* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))>
#<alt (* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))>
#<alt (* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))>
#<alt (* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))>
#<alt (* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))>
#<alt (* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))>
#<alt (* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))>
#<alt (* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))>
#<alt (* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))>
#<alt (* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))>
#<alt (* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))>
#<alt (* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))>
#<alt (* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))>
#<alt (* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))>
#<alt (* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))>
#<alt (* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))>
#<alt (* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))>
#<alt (* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))>
#<alt (* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))>
#<alt (* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))>
#<alt (* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))>
#<alt (* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))>
#<alt (* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))>
#<alt (* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))>
#<alt (* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))>
#<alt (* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))>
#<alt (* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))>
#<alt (* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))>
#<alt (* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))>
#<alt (* -1/8 (* R lambda2))>
#<alt (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))>
#<alt (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))>
#<alt (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R lambda1))>
#<alt (- (* 1/8 (* R (* lambda1 (pow phi2 2)))) (* R lambda1))>
#<alt (- (* (pow phi2 2) (- (* -1/384 (* R (* lambda1 (pow phi2 2)))) (* -1/8 (* R lambda1)))) (* R lambda1))>
#<alt (- (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/46080 (* R (* lambda1 (pow phi2 2)))) (* 1/384 (* R lambda1)))) (* -1/8 (* R lambda1)))) (* R lambda1))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* 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 (* 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)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt (* R lambda1)>
#<alt 1>
#<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 (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))>
#<alt (* R (* lambda2 (- 1 (/ lambda1 lambda2))))>
#<alt (+ (* -1 (* R (* lambda2 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2))))))) (* R (* lambda2 (- 1 (/ lambda1 lambda2)))))>
#<alt (+ (* R (* lambda2 (- 1 (/ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* R (* lambda2 (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2)))))))))>
#<alt (+ (* R (* lambda2 (- 1 (/ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2))))))) (* R (* lambda2 (- 1/384 (* 1/384 (/ lambda1 lambda2))))))))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* R (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))>
#<alt (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))>
#<alt (* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))>
#<alt (* -1 (* lambda1 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* lambda2 (cos (* 1/2 phi2)))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* lambda2 (cos (* 1/2 phi2)))>
#<alt (* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))>
#<alt (* lambda2 (- 1 (/ lambda1 lambda2)))>
#<alt (+ (* -1 (* lambda2 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* lambda2 (- 1 (/ lambda1 lambda2))))>
#<alt (+ (* lambda2 (- 1 (/ lambda1 lambda2))) (* (pow phi2 2) (+ (* -1 (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2))))) (* lambda2 (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2))))))))>
#<alt (+ (* lambda2 (- 1 (/ lambda1 lambda2))) (* (pow phi2 2) (+ (* -1 (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1 (* lambda2 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2)))))) (* lambda2 (- 1/384 (* 1/384 (/ lambda1 lambda2)))))))))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* lambda2 (cos (* 1/2 phi2)))>
#<alt (+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))>
#<alt (+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))>
#<alt (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))>
#<alt (* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))>
#<alt (* -1 (* lambda1 (cos (* 1/2 phi2))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))>
#<alt (- 1 (/ lambda1 lambda2))>
#<alt (- (+ 1 (* -1 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))>
#<alt (- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2)))) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))>
#<alt (- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- (+ 1/384 (* -1 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2)))))) (* 1/384 (/ lambda1 lambda2)))) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (cos (* 1/2 phi2))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))>
#<alt (* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))>
#<alt (* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))>
#<alt (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))>
#<alt (* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))>
#<alt (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))>
#<alt (/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)>
#<alt (/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)>
#<alt (/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)>
#<alt (cos (* 1/2 phi2))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (cos (* 1/2 phi2))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/4 (* phi1 phi2))>
#<alt (* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))>
#<alt (* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))>
#<alt (* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt 1>
#<alt (+ 1 (* -1/4 (* phi1 phi2)))>
#<alt (+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))>
#<alt (+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))>
#<alt (* -1/2 (* phi2 (sin (* 1/2 phi1))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* 1/384 (* R (* lambda2 (pow phi1 2))))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<alt (* lambda2 (pow phi1 2))>
#<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 (/ lambda1 lambda2)>
#<alt (+ (* -1/8 (/ (* lambda1 (pow phi2 2)) lambda2)) (/ lambda1 lambda2))>
#<alt (+ (* (pow phi2 2) (+ (* -1/8 (/ lambda1 lambda2)) (* 1/384 (/ (* lambda1 (pow phi2 2)) lambda2)))) (/ lambda1 lambda2))>
#<alt (+ (* (pow phi2 2) (+ (* -1/8 (/ lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (/ (* lambda1 (pow phi2 2)) lambda2)) (* 1/384 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<alt (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)>
#<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)))>
Calls

180 calls:

TimeVariablePointExpression
54.0ms
phi2
@0
(- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))
10.0ms
R
@0
(- 0 (* (* R lambda1) (cos (* 1/2 phi2))))
5.0ms
phi2
@inf
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2)))))
3.0ms
R
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2)))))
2.0ms
lambda1
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2)))))

rewrite400.0ms (2.3%)

Algorithm
1×batch-egg-rewrite
Rules
4656×*-lowering-*.f32
4656×*-lowering-*.f64
2432×/-lowering-/.f32
2432×/-lowering-/.f64
1836×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
043234
1226230
22261227
08772227
Stop Event
1×iter limit
1×node limit
Counts
22 → 391
Calls
Call 1
Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))) (* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1)))))
(- lambda1 lambda2)
(* R lambda2)
(+ (* R lambda2) (* (* phi1 phi1) (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1))))))
(* (* phi1 phi1) (+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1)))))
(+ (* -1/8 (* R lambda2)) (* (* 1/384 R) (* lambda2 (* phi1 phi1))))
(- 0 (* (* R lambda1) (cos (* 1/2 phi2))))
(* (* R lambda1) (cos (* 1/2 phi2)))
(* R lambda1)
(cos (* 1/2 phi2))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2)))
(- (cos (* 1/2 phi2)) (/ (* (cos (* 1/2 phi2)) lambda1) lambda2))
(* (* -1/2 phi2) (sin (* 1/2 phi1)))
(+ (cos (* 1/2 phi1)) (* (* -1/2 phi2) (sin (* 1/2 phi1))))
(* (* 1/384 R) (* lambda2 (* phi1 phi1)))
(* lambda2 (* phi1 phi1))
(* 1/2 phi2)
(/ (* (cos (* 1/2 phi2)) lambda1) lambda2)
(* (cos (* 1/2 phi2)) lambda1)
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)) R)
(exp.f64 (*.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))))) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (hypot.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)))))))
(/.f64 (hypot.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (pow.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)))))
(pow.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(*.f64 (hypot.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)))))) #s(literal 1/2 binary64)))
(*.f64 (hypot.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 3 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))))))))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64)) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) #s(literal 1 binary64)))
(fma.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (-.f64 lambda1 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)) (*.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 #s(literal -1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (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 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (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 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))))) (*.f64 (+.f64 lambda1 lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (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 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (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 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.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))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (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 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 lambda1 lambda2)) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (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 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (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 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 1 binary64))
(*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))))
(/.f64 #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 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (neg.f64 (+.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)))
(pow.f64 (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 R lambda2)
(*.f64 lambda2 R)
(+.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))
(+.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 R lambda2))
(+.f64 (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(+.f64 (+.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(-.f64 (/.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))) (/.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))) (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))))
(fma.f64 R lambda2 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))
(fma.f64 lambda2 R (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))
(fma.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 R lambda2))
(fma.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (*.f64 R lambda2) (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2))
(fma.f64 #s(literal -1/8 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 phi1 phi1) (*.f64 R lambda2))
(fma.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) phi1 (*.f64 R lambda2))
(fma.f64 (*.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) phi1) phi1 (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R lambda2)) #s(literal -1/8 binary64) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64)) (*.f64 R lambda2) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R #s(literal -1/8 binary64))) lambda2 (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 R lambda2)))
(/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))) (+.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (-.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 R lambda2)))))
(/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))) (+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))) (-.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (-.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 R lambda2)))) (+.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))) (-.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))))
(/.f64 (-.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))) (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))))) (neg.f64 (+.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (-.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 R lambda2))))))
(/.f64 (neg.f64 (-.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))) (neg.f64 (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) (-.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 R lambda2)))
(/.f64 (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))) (*.f64 (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))) (*.f64 (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))) (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))))
(pow.f64 (/.f64 (+.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (-.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 R lambda2)))) (+.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))) (-.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (-.f64 (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 R lambda2))))))
(*.f64 (-.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 R lambda2) (*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))))))
(+.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(+.f64 (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 phi1 (*.f64 phi1 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 R lambda2) (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 #s(literal -1/8 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 phi1 phi1)) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 R #s(literal 1/384 binary64)) (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (*.f64 phi1 phi1)) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (*.f64 (*.f64 R #s(literal 1/384 binary64)) (*.f64 phi1 phi1)) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 phi1 phi1) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) lambda2)) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 lambda2 (*.f64 phi1 phi1)) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 (*.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) phi1) phi1 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) phi1) phi1 (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R lambda2)) #s(literal -1/8 binary64) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64)) (*.f64 R lambda2) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R #s(literal -1/8 binary64))) lambda2 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 1/384 binary64)) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R #s(literal 1/384 binary64))) (*.f64 lambda2 (*.f64 phi1 phi1)) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(fma.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/384 binary64)) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1)))) (*.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R))))) (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))))) (+.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))) (-.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))) (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))) (-.f64 (*.f64 phi1 (*.f64 phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))) (*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(/.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R))))))) (+.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (-.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))))
(/.f64 (*.f64 (*.f64 phi1 phi1) (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R)))))) (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (-.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))
(*.f64 phi1 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(*.f64 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 phi1 phi1))
(*.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))) phi1)
(+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(+.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))) (/.f64 (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(fma.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 R (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(fma.f64 lambda2 (*.f64 R #s(literal -1/8 binary64)) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(fma.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (*.f64 R #s(literal 1/384 binary64))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 R lambda2) #s(literal -1/8 binary64) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(fma.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) lambda2)) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 #s(literal -1/8 binary64) (*.f64 R lambda2) (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(fma.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 R #s(literal 1/384 binary64)) (*.f64 lambda2 (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (*.f64 R #s(literal 1/384 binary64)) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) lambda2)) (*.f64 phi1 phi1) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 lambda2 phi1) (*.f64 phi1 (*.f64 R #s(literal 1/384 binary64))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 R #s(literal -1/8 binary64)) lambda2 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(fma.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) #s(literal 1/384 binary64) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 (*.f64 R #s(literal 1/384 binary64)) (*.f64 phi1 phi1)) lambda2 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 (*.f64 R #s(literal 1/384 binary64)) (*.f64 lambda2 phi1)) phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal 1/384 binary64)) R (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) lambda2)) phi1) phi1 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))
(fma.f64 (*.f64 #s(literal -1/8 binary64) lambda2) R (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R)))))) (+.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (-.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R)))))) (+.f64 (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))) (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 (*.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) #s(literal 1/384 binary64)) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (-.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))) (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))))
(/.f64 (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R))))))) (neg.f64 (+.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (-.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))) (neg.f64 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(/.f64 (-.f64 (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64))) (-.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))) (*.f64 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))) (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))) (*.f64 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (-.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64))))) (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))) (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 R lambda2) (*.f64 R (*.f64 lambda2 (*.f64 R lambda2)))) #s(literal -1/512 binary64)) (*.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) (*.f64 phi1 phi1))) (*.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (*.f64 #s(literal 1/56623104 binary64) (*.f64 R (*.f64 R R)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (-.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))) (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)))))))
(*.f64 (-.f64 (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 R lambda2))) #s(literal 1/64 binary64)) (*.f64 #s(literal 1/147456 binary64) (*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal -1/8 binary64)) (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(fma.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1)) #s(literal 0 binary64))
(fma.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 0 binary64))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 0 binary64))
(fma.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 R lambda1) #s(literal 0 binary64))
(fma.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 0 binary64))
(neg.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))))
(/.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) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (*.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)))) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 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) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))) (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))))) #s(literal -1 binary64))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1)))
(*.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)))
(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 #s(literal -1 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 R lambda1))
(*.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 0 binary64))
(fma.f64 R (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 0 binary64))
(fma.f64 lambda1 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 0 binary64))
(fma.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 0 binary64))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 R lambda1) #s(literal 0 binary64))
(fma.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) R #s(literal 0 binary64))
(fma.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1 #s(literal 0 binary64))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1 #s(literal 0 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1))))
(*.f64 R (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 lambda1 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 R lambda1))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) R)
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1)
(*.f64 R lambda1)
(*.f64 lambda1 R)
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 R lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 R lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2))) (*.f64 R lambda2)))
(fma.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 R lambda2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 R lambda2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2))) (*.f64 R lambda2)))
(/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))))
(*.f64 lambda2 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))))
(*.f64 lambda2 (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))) R))
(*.f64 (*.f64 R lambda2) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))) (*.f64 R lambda2))
(*.f64 (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))) R)
(*.f64 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))) lambda2)
(+.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2)))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2))) lambda2))
(fma.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 lambda2 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2))) lambda2))
(/.f64 (*.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2)))))
(/.f64 (*.f64 lambda2 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)) #s(literal 3 binary64))) lambda2) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2)))))
(/.f64 (*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))))
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))) lambda2)
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))
(-.f64 (/.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2))))) (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2))))))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))) (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(fma.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (neg.f64 (/.f64 #s(literal 1 binary64) lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1)) (/.f64 #s(literal 1 binary64) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(fma.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(fma.f64 (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2)))))))
(/.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) 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) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2)))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 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 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.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 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (neg.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2))))) (*.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2)))) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2)))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2)))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2))))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.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 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi2))))) (*.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 #s(literal 1/2 binary64) phi2))))) (/.f64 lambda1 lambda2))))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) 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) phi2))))) (*.f64 (/.f64 lambda1 lambda2) (/.f64 lambda1 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))))
(*.f64 #s(literal -1/2 binary64) (*.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 phi2 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) phi2))
(*.f64 (*.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/2 binary64))
(*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)) phi2)
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.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))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(-.f64 (/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 #s(literal -1/2 binary64) (*.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 phi2 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (*.f64 phi2 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(fma.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)) phi2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.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))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.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))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(/.f64 (-.f64 (+.f64 #s(literal 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 -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.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))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(/.f64 (neg.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))))) (neg.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (+.f64 #s(literal 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 -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))))) (pow.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))
(pow.f64 (/.f64 (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.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))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.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))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(*.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 #s(literal -1/2 binary64) phi2)) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 #s(literal 1 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(*.f64 R (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))
(*.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (*.f64 R #s(literal 1/384 binary64))))
(*.f64 (*.f64 phi1 phi1) (*.f64 R (*.f64 #s(literal 1/384 binary64) lambda2)))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(*.f64 (*.f64 R #s(literal 1/384 binary64)) (*.f64 lambda2 (*.f64 phi1 phi1)))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (*.f64 R #s(literal 1/384 binary64)))
(*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) lambda2)) (*.f64 phi1 phi1))
(*.f64 (*.f64 lambda2 phi1) (*.f64 phi1 (*.f64 R #s(literal 1/384 binary64))))
(*.f64 (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))) #s(literal 1/384 binary64))
(*.f64 (*.f64 (*.f64 R #s(literal 1/384 binary64)) (*.f64 phi1 phi1)) lambda2)
(*.f64 (*.f64 (*.f64 R #s(literal 1/384 binary64)) (*.f64 lambda2 phi1)) phi1)
(*.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal 1/384 binary64)) R)
(*.f64 (*.f64 (*.f64 R (*.f64 #s(literal 1/384 binary64) lambda2)) phi1) phi1)
(*.f64 lambda2 (*.f64 phi1 phi1))
(*.f64 phi1 (*.f64 lambda2 phi1))
(*.f64 (*.f64 phi1 phi1) lambda2)
(*.f64 (*.f64 lambda2 phi1) phi1)
(*.f64 #s(literal 1/2 binary64) phi2)
(*.f64 phi2 #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal -1 binary64)))
(neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (/.f64 lambda1 lambda2))))
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1)) (-.f64 #s(literal 0 binary64) lambda2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(/.f64 (*.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1 binary64)) lambda2)
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1))) (neg.f64 (-.f64 #s(literal 0 binary64) lambda2)))
(pow.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 lambda2 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 #s(literal 1 binary64) lambda2)))
(*.f64 lambda1 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2))
(*.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 #s(literal 1 binary64) lambda2))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 lambda1 lambda2)))
(*.f64 (/.f64 #s(literal 1 binary64) lambda2) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (/.f64 #s(literal 1 binary64) lambda2) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal -1 binary64)))
(*.f64 (/.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1)

simplify597.0ms (3.5%)

Algorithm
1×egg-herbie
Rules
7968×*-lowering-*.f32
7968×*-lowering-*.f64
4866×+-lowering-+.f64
4866×+-lowering-+.f32
1734×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0103015442
1377113963
0856013963
Stop Event
1×iter limit
1×node limit
Counts
720 → 720
Calls
Call 1
Inputs
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))
(* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))
(* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(- lambda1 lambda2)
(- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(* -1 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 lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R lambda2)
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))
(* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))
(* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))
(* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))
(* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))
(* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))
(* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))
(* R lambda2)
(+ (* -1/8 (* R (* lambda2 (pow phi1 2)))) (* R lambda2))
(+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))
(+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))
(* 1/384 (* R (* lambda2 (pow phi1 4))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))
(* 1/384 (* R (* lambda2 (pow phi1 4))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))
(* -1/8 (* R (* lambda2 (pow phi1 2))))
(* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))
(* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))
(* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))
(* 1/384 (* R (* lambda2 (pow phi1 4))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* 1/384 (* R (* lambda2 (pow phi1 4))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))
(* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))
(* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))
(* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))
(* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))
(* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))
(* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))
(* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))
(* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))
(* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))
(* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))
(* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))
(* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))
(* -1/8 (* R lambda2))
(+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))
(+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))
(+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R lambda1))
(- (* 1/8 (* R (* lambda1 (pow phi2 2)))) (* R lambda1))
(- (* (pow phi2 2) (- (* -1/384 (* R (* lambda1 (pow phi2 2)))) (* -1/8 (* R lambda1)))) (* R lambda1))
(- (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/46080 (* R (* lambda1 (pow phi2 2)))) (* 1/384 (* R lambda1)))) (* -1/8 (* R lambda1)))) (* R lambda1))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* 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))))
(* 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)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
(* R lambda1)
1
(+ 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))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))
(* R (* lambda2 (- 1 (/ lambda1 lambda2))))
(+ (* -1 (* R (* lambda2 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2))))))) (* R (* lambda2 (- 1 (/ lambda1 lambda2)))))
(+ (* R (* lambda2 (- 1 (/ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* R (* lambda2 (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2)))))))))
(+ (* R (* lambda2 (- 1 (/ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2))))))) (* R (* lambda2 (- 1/384 (* 1/384 (/ lambda1 lambda2))))))))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* R (* lambda2 (cos (* 1/2 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(* lambda2 (cos (* 1/2 phi2)))
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* lambda2 (cos (* 1/2 phi2)))
(* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(* lambda2 (- 1 (/ lambda1 lambda2)))
(+ (* -1 (* lambda2 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* lambda2 (- 1 (/ lambda1 lambda2))))
(+ (* lambda2 (- 1 (/ lambda1 lambda2))) (* (pow phi2 2) (+ (* -1 (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2))))) (* lambda2 (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2))))))))
(+ (* lambda2 (- 1 (/ lambda1 lambda2))) (* (pow phi2 2) (+ (* -1 (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1 (* lambda2 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2)))))) (* lambda2 (- 1/384 (* 1/384 (/ lambda1 lambda2)))))))))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* lambda2 (cos (* 1/2 phi2)))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))
(* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))
(* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(- 1 (/ lambda1 lambda2))
(- (+ 1 (* -1 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))
(- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2)))) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))
(- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- (+ 1/384 (* -1 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2)))))) (* 1/384 (/ lambda1 lambda2)))) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))
(* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))
(* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))
(* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))
(* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)
(/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)
(/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/4 (* phi1 phi2))
(* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
1
(+ 1 (* -1/4 (* phi1 phi2)))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* lambda2 (pow phi1 2))
(* 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)
(/ lambda1 lambda2)
(+ (* -1/8 (/ (* lambda1 (pow phi2 2)) lambda2)) (/ lambda1 lambda2))
(+ (* (pow phi2 2) (+ (* -1/8 (/ lambda1 lambda2)) (* 1/384 (/ (* lambda1 (pow phi2 2)) lambda2)))) (/ lambda1 lambda2))
(+ (* (pow phi2 2) (+ (* -1/8 (/ lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (/ (* lambda1 (pow phi2 2)) lambda2)) (* 1/384 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
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)))
Outputs
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 R (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 lambda1 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(*.f64 lambda1 (-.f64 (+.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))
(*.f64 lambda1 (-.f64 (+.f64 (+.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 lambda1 (*.f64 lambda1 lambda1))))) (/.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) lambda1)))
(* -1 (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) (-.f64 #s(literal 0 binary64) R))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(*.f64 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(*.f64 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (+.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(*.f64 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (-.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 R (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)))))))
(* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 lambda2 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(*.f64 lambda2 (-.f64 (+.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))
(*.f64 lambda2 (-.f64 (+.f64 (+.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 lambda2 lambda2)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (/.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) lambda2)))
(* -1 (* R (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) (-.f64 #s(literal 0 binary64) R))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(*.f64 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(*.f64 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (+.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* R (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))
(*.f64 (-.f64 (*.f64 R (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (-.f64 (*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))
(*.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2)))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))
(+.f64 (*.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R phi1) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (*.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 (*.f64 R phi1) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 R (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))))
(+ (* R (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (* R (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (*.f64 R (hypot.f64 phi2 (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 R (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.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 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (*.f64 (*.f64 R phi1) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 #s(literal 1/12 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.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 (*.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) #s(literal -1/4 binary64)))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) #s(literal -1/4 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)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) R) phi1) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R phi2) phi1) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (*.f64 R (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 R phi2) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R phi2) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal -1/4 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* R (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (* R (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 R (*.f64 (*.f64 (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal -1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal -1/4 binary64)))))))))))
(* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(*.f64 (*.f64 R phi2) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))
(*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(* phi2 (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 R (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #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 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (*.f64 phi2 phi2))))))
(* phi2 (+ (* -1/4 (* (/ (* R (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (+ (* 1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(*.f64 phi2 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 R (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #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 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (*.f64 phi2 phi2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #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 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 phi2 (*.f64 phi2 phi2))))))
(* -1 (* (* R phi2) (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1 binary64) (*.f64 R phi2)))
(* -1 (* phi2 (+ (* -1/2 (* (/ (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(*.f64 (+.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64)))) phi2)))) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1/2 (* (/ (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(*.f64 (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))) phi2)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* R (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (* R (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* 1/2 (* (* R (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))) phi2)) (* R (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))
(*.f64 (-.f64 (*.f64 R (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 R (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64)))) (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))) (*.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64))))))))) (*.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 lambda1 lambda1))))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (/.f64 lambda2 lambda1) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))) lambda1))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda1)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda1)) lambda1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) lambda1)))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (- (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (/ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 4)) (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) lambda1)))))
(* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2)
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))))))
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 lambda2 lambda2))))))
(* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (+ (* -1/2 (* phi2 (sin (* 1/2 phi1)))) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))))))))
(*.f64 lambda2 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2)) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (+.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))) lambda2)) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) lambda2)) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))
(hypot.f64 phi2 (-.f64 lambda1 lambda2))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))
(+.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (*.f64 #s(literal 1/2 binary64) (*.f64 phi1 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))
(+.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) #s(literal -1/4 binary64))))) (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))))
(+ (sqrt (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/48 phi2) (* 1/16 phi2)) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) (- (+ 1 (* (pow (- lambda1 lambda2) 2) (- (* 1/16 (pow phi2 2)) 1/4))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1/2 (* phi2 (pow (- lambda1 lambda2) 2)))) 2) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (pow phi2 2) (pow (- lambda1 lambda2) 2)))))))))))
(+.f64 (hypot.f64 phi2 (-.f64 lambda1 lambda2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) #s(literal -1/4 binary64)))) (*.f64 phi1 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 #s(literal 1/12 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.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 (*.f64 phi2 phi2) #s(literal 1/16 binary64)) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (*.f64 (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))) #s(literal -1/4 binary64)))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi2 phi1) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) 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 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (*.f64 (pow.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) phi1)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal -1/4 binary64))))) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* -1/4 (* (* phi2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (pow (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) 3))))) (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal -1/4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) #s(literal 3 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal -1/4 binary64))))))))))
(* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))
(*.f64 phi2 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))
(*.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(*.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (*.f64 phi2 phi2)))))))
(* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (+ (* -1/4 (* (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (pow phi2 3)) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (+ (* 1/2 (* (/ (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) (pow phi2 2)) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))))))))
(*.f64 phi2 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (*.f64 phi2 phi2))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #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 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) (*.f64 phi2 (*.f64 phi2 phi2)))))))
(* -1 (* phi2 (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))
(*.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1/2 (* (/ (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))))
(*.f64 (+.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))) phi2)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1/2 (* (/ (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))))) phi2) (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(*.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64)))))) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (sqrt (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2))))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (/ (* (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))) phi2) (sqrt (/ 1 (pow (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))) 3))))) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (- (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)) (* 1/4 (/ (pow (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))) 2) (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))))))) phi2)) (* 1/2 (* (sqrt (/ 1 (+ 1 (* 1/4 (* (pow (sin (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)))))) (+ (* 2 phi1) (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) phi2)))))
(*.f64 (-.f64 (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))) (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) #s(literal 3 binary64))))) phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (+.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 #s(literal 2 binary64))) #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2) lambda1) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 #s(literal 0 binary64) lambda1))
(* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1)
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))) (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* lambda2 (+ (* -1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 phi1)) (+ (* -1 (/ (* lambda1 (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))) lambda2)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))))))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1) lambda2))) (-.f64 #s(literal 0 binary64) lambda2))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- (+ lambda1 (* -1/4 (* phi1 (* phi2 (- lambda1 lambda2))))) lambda2)
(+.f64 lambda1 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) phi1) (*.f64 phi2 (-.f64 lambda1 lambda2))) lambda2))
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* -1/8 (* phi1 (- lambda1 lambda2)))))) lambda2)
(-.f64 (+.f64 lambda1 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 phi2 (-.f64 lambda1 lambda2))) (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 (-.f64 lambda1 lambda2)))))) lambda2)
(- (+ lambda1 (* phi1 (+ (* -1/4 (* phi2 (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (- lambda1 lambda2)) (* 1/96 (* phi1 (* phi2 (- lambda1 lambda2))))))))) lambda2)
(+.f64 lambda1 (-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 phi2 (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/96 binary64) phi1) (*.f64 phi2 (-.f64 lambda1 lambda2))))))) lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(* (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1))))) (- lambda1 lambda2))
(*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 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))))
(+ (* -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))))
(+ (* -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))))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) phi2)))
(* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)))
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) phi2)))
(* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (* (cos (* 1/2 phi1)) (- lambda1 lambda2)) phi2)) (* 1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) lambda1))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R lambda2)
(*.f64 R lambda2)
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(*.f64 R (+.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(*.f64 R (+.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(*.f64 R (+.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(*.f64 R (+.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(*.f64 R (+.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(*.f64 R (+.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(*.f64 R (+.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* R (+ lambda2 (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))))
(*.f64 R (+.f64 lambda2 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))
(*.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))) lambda2) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))
(*.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))) lambda2) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))
(*.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))) lambda2) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (+ (* -1 lambda2) (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))))
(*.f64 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))) lambda2) (-.f64 #s(literal 0 binary64) R))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(*.f64 lambda2 (+.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(*.f64 lambda2 (+.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(*.f64 lambda2 (+.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(*.f64 lambda2 (+.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(*.f64 lambda2 (+.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(*.f64 lambda2 (+.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(*.f64 lambda2 (+.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))))
(* lambda2 (+ R (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))))
(*.f64 lambda2 (+.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))))
(* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64)))) R)))
(* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64)))) R)))
(* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64)))) R)))
(* -1 (* lambda2 (+ (* -1 R) (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda2 (-.f64 (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64)))) R)))
(* R lambda2)
(*.f64 R lambda2)
(+ (* -1/8 (* R (* lambda2 (pow phi1 2)))) (* R lambda2))
(+.f64 (*.f64 R lambda2) (*.f64 #s(literal -1/8 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))
(+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))
(+.f64 (*.f64 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(+ (* R lambda2) (* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))))
(+.f64 (*.f64 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))))
(* 1/384 (* R (* lambda2 (pow phi1 4))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (pow.f64 phi1 #s(literal 4 binary64)))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64)) (/.f64 (*.f64 R lambda2) (pow.f64 phi1 #s(literal 4 binary64))))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64)) (/.f64 (*.f64 R lambda2) (pow.f64 phi1 #s(literal 4 binary64))))))
(* 1/384 (* R (* lambda2 (pow phi1 4))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (pow.f64 phi1 #s(literal 4 binary64)))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64)) (/.f64 (*.f64 R lambda2) (pow.f64 phi1 #s(literal 4 binary64))))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (+ (* 1/384 (* R lambda2)) (/ (* R lambda2) (pow phi1 4)))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64)) (/.f64 (*.f64 R lambda2) (pow.f64 phi1 #s(literal 4 binary64))))))
(* -1/8 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal -1/8 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* (pow phi1 2) (+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2))))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* 1/384 (* R (* lambda2 (pow phi1 4))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (pow.f64 phi1 #s(literal 4 binary64)))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* 1/384 (* R (* lambda2 (pow phi1 4))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (pow.f64 phi1 #s(literal 4 binary64)))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 4) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (pow.f64 phi1 #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(*.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(*.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(*.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(*.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(*.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(*.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(*.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* R (* (pow phi1 2) (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2))))))
(*.f64 R (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))
(* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))
(* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))
(* -1 (* R (* (pow phi1 2) (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R (*.f64 phi1 phi1)) (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (* (pow phi1 2) (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2))))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (neg.f64 (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64)))))
(* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (neg.f64 (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64)))))
(* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (neg.f64 (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64)))))
(* -1 (* lambda2 (* (pow phi1 2) (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R)))))
(*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) (neg.f64 (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(*.f64 R (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(*.f64 R (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(*.f64 R (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(*.f64 R (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(*.f64 R (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(*.f64 R (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(*.f64 R (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* R (+ (* -1/8 lambda2) (* 1/384 (* lambda2 (pow phi1 2)))))
(*.f64 R (+.f64 (*.f64 lambda2 #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))
(*.f64 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))
(*.f64 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))
(*.f64 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64))) (-.f64 #s(literal 0 binary64) R))
(* -1 (* R (+ (* -1/384 (* lambda2 (pow phi1 2))) (* 1/8 lambda2))))
(*.f64 (+.f64 (*.f64 (*.f64 lambda2 (*.f64 phi1 phi1)) #s(literal -1/384 binary64)) (*.f64 lambda2 #s(literal 1/8 binary64))) (-.f64 #s(literal 0 binary64) R))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(*.f64 lambda2 (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(*.f64 lambda2 (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(*.f64 lambda2 (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(*.f64 lambda2 (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(*.f64 lambda2 (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(*.f64 lambda2 (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(*.f64 lambda2 (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* lambda2 (+ (* -1/8 R) (* 1/384 (* R (pow phi1 2)))))
(*.f64 lambda2 (+.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 phi1 phi1)))))
(* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))
(*.f64 (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))
(*.f64 (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))
(*.f64 (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1/384 (* R (pow phi1 2))) (* 1/8 R))))
(*.f64 (+.f64 (*.f64 #s(literal -1/384 binary64) (*.f64 R (*.f64 phi1 phi1))) (*.f64 R #s(literal 1/8 binary64))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1/8 (* R lambda2))
(*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2))
(+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))
(+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))
(+ (* -1/8 (* R lambda2)) (* 1/384 (* R (* lambda2 (pow phi1 2)))))
(+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1)))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* (pow phi1 2) (+ (* -1/8 (/ (* R lambda2) (pow phi1 2))) (* 1/384 (* R lambda2))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 phi1 phi1)) (*.f64 (*.f64 R lambda2) #s(literal 1/384 binary64))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(- (* 1/8 (* R (* lambda1 (pow phi2 2)))) (* R lambda1))
(-.f64 (*.f64 (*.f64 R #s(literal 1/8 binary64)) (*.f64 lambda1 (*.f64 phi2 phi2))) (*.f64 R lambda1))
(- (* (pow phi2 2) (- (* -1/384 (* R (* lambda1 (pow phi2 2)))) (* -1/8 (* R lambda1)))) (* R lambda1))
(-.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 #s(literal -1/384 binary64) R) (*.f64 lambda1 (*.f64 phi2 phi2))) (*.f64 #s(literal 1/8 binary64) (*.f64 R lambda1)))) (*.f64 R lambda1))
(- (* (pow phi2 2) (- (* (pow phi2 2) (- (* 1/46080 (* R (* lambda1 (pow phi2 2)))) (* 1/384 (* R lambda1)))) (* -1/8 (* R lambda1)))) (* R lambda1))
(-.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 #s(literal 1/46080 binary64) R) (*.f64 lambda1 (*.f64 phi2 phi2))) (*.f64 #s(literal -1/384 binary64) (*.f64 R lambda1)))) (*.f64 #s(literal 1/8 binary64) (*.f64 R lambda1)))) (*.f64 R lambda1))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R lambda1)
(*.f64 R lambda1)
(+ (* -1/8 (* R (* lambda1 (pow phi2 2)))) (* R lambda1))
(+.f64 (*.f64 R lambda1) (*.f64 (*.f64 R #s(literal -1/8 binary64)) (*.f64 lambda1 (*.f64 phi2 phi2))))
(+ (* R lambda1) (* (pow phi2 2) (+ (* -1/8 (* R lambda1)) (* 1/384 (* R (* lambda1 (pow phi2 2)))))))
(+.f64 (*.f64 R lambda1) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda1)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda1 (*.f64 phi2 phi2))))))
(+ (* 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 R lambda1) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda1)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 R lambda1)) (*.f64 (*.f64 #s(literal -1/46080 binary64) R) (*.f64 lambda1 (*.f64 phi2 phi2))))))))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
(* R lambda1)
(*.f64 R lambda1)
1
#s(literal 1 binary64)
(+ 1 (* -1/8 (pow phi2 2)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal -1/8 binary64)))
(+ 1 (* (pow phi2 2) (- (* 1/384 (pow phi2 2)) 1/8)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal 1/384 binary64)) #s(literal -1/8 binary64))))
(+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (+ 1/384 (* -1/46080 (pow phi2 2)))) 1/8)))
(+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi2 phi2) #s(literal -1/46080 binary64)))) #s(literal -1/8 binary64))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1 (* R (* lambda1 (cos (* 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 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 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 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 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 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2)) (* R (cos (* 1/2 phi2)))))
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* R (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda1 (cos (* 1/2 phi2)))) lambda2))))
(*.f64 (-.f64 (/.f64 (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* R (* lambda2 (- 1 (/ lambda1 lambda2))))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(+ (* -1 (* R (* lambda2 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2))))))) (* R (* lambda2 (- 1 (/ lambda1 lambda2)))))
(-.f64 (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R (*.f64 (*.f64 lambda2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2)))))
(+ (* R (* lambda2 (- 1 (/ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* R (* lambda2 (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2)))))))))
(+.f64 (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 R (*.f64 (*.f64 lambda2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1/384 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/384 binary64))))) (*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2))))))
(+ (* R (* lambda2 (- 1 (/ lambda1 lambda2)))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* (pow phi2 2) (+ (* -1 (* R (* lambda2 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2))))))) (* R (* lambda2 (- 1/384 (* 1/384 (/ lambda1 lambda2))))))))))
(+.f64 (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1/384 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/384 binary64)))) (*.f64 R (*.f64 (*.f64 lambda2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1/46080 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/46080 binary64))))))) (*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2))))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 R (*.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))))
(* R (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1 (* R (* lambda1 (cos (* 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 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 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 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 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 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* R (cos (* 1/2 phi2)))) (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)))
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 phi2)))) lambda1)) (* R (cos (* 1/2 phi2))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1))
(* lambda2 (cos (* 1/2 phi2)))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* lambda2 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)))
(* lambda2 (cos (* 1/2 phi2)))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 (-.f64 (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 (-.f64 (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))))
(*.f64 (-.f64 (/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (- 1 (/ lambda1 lambda2)))
(*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))
(+ (* -1 (* lambda2 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (* lambda2 (- 1 (/ lambda1 lambda2))))
(-.f64 (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))) (*.f64 (*.f64 lambda2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2))))
(+ (* lambda2 (- 1 (/ lambda1 lambda2))) (* (pow phi2 2) (+ (* -1 (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2))))) (* lambda2 (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2))))))))
(+.f64 (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))) (*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (*.f64 lambda2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1/384 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/384 binary64)))) (*.f64 lambda2 (+.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2))))))
(+ (* lambda2 (- 1 (/ lambda1 lambda2))) (* (pow phi2 2) (+ (* -1 (* lambda2 (+ 1/8 (* -1/8 (/ lambda1 lambda2))))) (* (pow phi2 2) (+ (* -1 (* lambda2 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2)))))) (* lambda2 (- 1/384 (* 1/384 (/ lambda1 lambda2)))))))))
(+.f64 (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))) (*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 lambda2 (+.f64 #s(literal 1/384 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/384 binary64)))) (*.f64 (*.f64 lambda2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1/46080 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/46080 binary64)))))) (*.f64 lambda2 (+.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2))))))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 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)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 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)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 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)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 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)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 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)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 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)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 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)))
(* lambda2 (- (cos (* 1/2 phi2)) (/ (* lambda1 (cos (* 1/2 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)))
(* lambda2 (cos (* 1/2 phi2)))
(*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* lambda2 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1))
(* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* lambda1 (+ (* -1 (cos (* 1/2 phi2))) (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))
(*.f64 lambda1 (-.f64 (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 phi2)) (* -1 (/ (* lambda2 (cos (* 1/2 phi2))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(- 1 (/ lambda1 lambda2))
(-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))
(- (+ 1 (* -1 (* (pow phi2 2) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))
(-.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2)))) (/.f64 lambda1 lambda2))
(- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- 1/384 (* 1/384 (/ lambda1 lambda2)))) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1/384 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/384 binary64)))) (+.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2)))) (/.f64 lambda1 lambda2)))
(- (+ 1 (* (pow phi2 2) (- (* (pow phi2 2) (- (+ 1/384 (* -1 (* (pow phi2 2) (+ 1/46080 (* -1/46080 (/ lambda1 lambda2)))))) (* 1/384 (/ lambda1 lambda2)))) (+ 1/8 (* -1/8 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))
(-.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 (-.f64 #s(literal 1/384 binary64) (*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1/46080 binary64) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/46080 binary64))))) (*.f64 (/.f64 lambda1 lambda2) #s(literal -1/384 binary64)))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/8 binary64) (/.f64 lambda1 lambda2))))) (/.f64 lambda1 lambda2))
(- (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)) (/ (* 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)) (/ (* 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)) (/ (* 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)) (/ (* 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)) (/ (* 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)) (/ (* 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)) (/ (* 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))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* 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 (/ (* 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 (/ (* 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))
(* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)) lambda2)
(* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))
(*.f64 lambda1 (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)))
(* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))
(*.f64 lambda1 (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)))
(* lambda1 (- (/ (cos (* 1/2 phi2)) lambda1) (/ (cos (* 1/2 phi2)) lambda2)))
(*.f64 lambda1 (-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)))
(* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)) lambda2)
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))
(*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))
(*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (* -1 (/ (cos (* 1/2 phi2)) lambda1)) (* -1 (/ (cos (* 1/2 phi2)) lambda2)))))
(*.f64 (+.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (/ (* lambda1 (cos (* 1/2 phi2))) lambda2))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1)) lambda2)
(/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1)) lambda2)
(/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1)) lambda2)
(/ (- (* lambda2 (cos (* 1/2 phi2))) (* lambda1 (cos (* 1/2 phi2)))) lambda2)
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda2 lambda1)) lambda2)
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* 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 (/ (* 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 (/ (* 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))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1 (/ (* 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 (/ (* 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 (/ (* 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))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/4 (* phi1 phi2))
(*.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi2))
(* phi1 (+ (* -1/4 phi2) (* 1/96 (* (pow phi1 2) phi2))))
(*.f64 phi1 (+.f64 (*.f64 phi2 #s(literal -1/4 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 phi2 (*.f64 phi1 phi1)))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* -1/7680 (* (pow phi1 2) phi2)) (* 1/96 phi2)))))
(*.f64 phi1 (+.f64 (*.f64 phi2 #s(literal -1/4 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 phi2 (*.f64 phi1 phi1)) #s(literal -1/7680 binary64)) (*.f64 phi2 #s(literal 1/96 binary64))))))
(* phi1 (+ (* -1/4 phi2) (* (pow phi1 2) (+ (* 1/96 phi2) (* (pow phi1 2) (+ (* -1/7680 phi2) (* 1/1290240 (* (pow phi1 2) phi2))))))))
(*.f64 phi1 (+.f64 (*.f64 phi2 #s(literal -1/4 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 phi2 #s(literal 1/96 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 phi2 #s(literal -1/7680 binary64)) (*.f64 (*.f64 phi2 (*.f64 phi1 phi1)) #s(literal 1/1290240 binary64))))))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
1
#s(literal 1 binary64)
(+ 1 (* -1/4 (* phi1 phi2)))
(+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/4 binary64) (*.f64 phi1 phi2)))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* -1/8 phi1))))
(+.f64 #s(literal 1 binary64) (*.f64 phi1 (+.f64 (*.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 #s(literal -1/8 binary64)))))
(+ 1 (* phi1 (+ (* -1/4 phi2) (* phi1 (- (* 1/96 (* phi1 phi2)) 1/8)))))
(+.f64 #s(literal 1 binary64) (*.f64 phi1 (+.f64 (*.f64 phi2 #s(literal -1/4 binary64)) (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/96 binary64) (*.f64 phi1 phi2)) #s(literal -1/8 binary64))))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (/ (cos (* 1/2 phi1)) phi2)))
(*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)))
(* -1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ (* -1 (/ (cos (* 1/2 phi1)) phi2)) (* 1/2 (sin (* 1/2 phi1))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* 1/384 (* R (* lambda2 (pow phi1 2))))
(*.f64 #s(literal 1/384 binary64) (*.f64 R (*.f64 lambda2 (*.f64 phi1 phi1))))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* lambda2 (pow phi1 2))
(*.f64 lambda2 (*.f64 phi1 phi1))
(* 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)
(/ lambda1 lambda2)
(/.f64 lambda1 lambda2)
(+ (* -1/8 (/ (* lambda1 (pow phi2 2)) lambda2)) (/ lambda1 lambda2))
(+.f64 (/.f64 lambda1 lambda2) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 lambda1 (*.f64 phi2 phi2))) lambda2))
(+ (* (pow phi2 2) (+ (* -1/8 (/ lambda1 lambda2)) (* 1/384 (/ (* lambda1 (pow phi2 2)) lambda2)))) (/ lambda1 lambda2))
(+.f64 (/.f64 lambda1 lambda2) (*.f64 (*.f64 phi2 phi2) (+.f64 (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2) (/.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 lambda1 (*.f64 phi2 phi2))) lambda2))))
(+ (* (pow phi2 2) (+ (* -1/8 (/ lambda1 lambda2)) (* (pow phi2 2) (+ (* -1/46080 (/ (* lambda1 (pow phi2 2)) lambda2)) (* 1/384 (/ lambda1 lambda2)))))) (/ lambda1 lambda2))
(+.f64 (/.f64 lambda1 lambda2) (*.f64 (*.f64 phi2 phi2) (+.f64 (/.f64 (*.f64 lambda1 #s(literal -1/8 binary64)) lambda2) (*.f64 (*.f64 phi2 phi2) (+.f64 (/.f64 (*.f64 lambda1 #s(literal 1/384 binary64)) lambda2) (/.f64 (*.f64 (*.f64 lambda1 (*.f64 phi2 phi2)) #s(literal -1/46080 binary64)) lambda2))))))
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
(/ (* lambda1 (cos (* 1/2 phi2))) lambda2)
(/.f64 (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) lambda2)
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 #s(literal 1/384 binary64) (*.f64 lambda1 (*.f64 phi2 phi2))))))
(+ 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 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* lambda1 (cos (* 1/2 phi2)))
(*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))

eval242.0ms (1.4%)

Compiler

Compiled 38006 to 2583 computations (93.2% saved)

prune192.0ms (1.1%)

Pruning

45 alts after pruning (40 fresh and 5 done)

PrunedKeptTotal
New121161217
Fresh103444
Picked415
Done044
Total1225451270
Accuracy
99.4%
Counts
1270 → 45
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.4%
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
21.2%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1))
9.6%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
8.2%
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
23.6%
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
32.0%
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
32.2%
(*.f64 (-.f64 (*.f64 R (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (neg.f64 lambda1))
32.2%
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (neg.f64 lambda1))
30.8%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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))
30.8%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (neg.f64 lambda1))
16.0%
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (exp.f64 (*.f64 (log.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))) #s(literal -1 binary64)))) (neg.f64 lambda1))
46.9%
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
12.7%
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
29.0%
(*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
✓20.8%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
21.2%
(*.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
12.5%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
8.7%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
8.9%
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
32.1%
(*.f64 (neg.f64 phi1) R)
9.6%
(*.f64 (neg.f64 R) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
15.3%
(*.f64 (neg.f64 R) (*.f64 lambda2 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
15.3%
(*.f64 (neg.f64 R) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
8.2%
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
21.2%
(*.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
56.9%
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
8.9%
(*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
63.4%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
63.3%
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
✓91.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
✓91.5%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
76.0%
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
46.9%
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))))
11.8%
(*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))
28.1%
(*.f64 R (*.f64 (neg.f64 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
19.7%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
21.1%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
54.0%
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
47.5%
(*.f64 R (*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
39.0%
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
27.5%
(*.f64 R (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi2 phi1) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 phi2 phi1) (+.f64 lambda1 lambda2)))))
57.2%
(*.f64 R (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) (-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (-.f64 lambda1 lambda2))))))
42.7%
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))
✓33.5%
(*.f64 R phi2)
✓22.8%
(*.f64 R lambda2)
Compiler

Compiled 2685 to 1011 computations (62.3% saved)

regimes369.0ms (2.1%)

Counts
87 → 1
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 (neg.f64 R) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(*.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 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
(*.f64 R (*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 R (*.f64 (neg.f64 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(*.f64 R (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) lambda2))))
(*.f64 R (*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1) lambda2))))
(*.f64 R (*.f64 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) lambda1))
(*.f64 lambda1 (*.f64 R (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda2) lambda1))))
(*.f64 R (hypot.f64 (*.f64 (*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 phi1)))))))
(*.f64 R (*.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))))
(*.f64 R (hypot.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 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))
(*.f64 (-.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)) (-.f64 #s(literal 0 binary64) lambda2))
(*.f64 R (hypot.f64 (/.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 phi1 phi2)))
(*.f64 R (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 R (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi2 phi1) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (*.f64 (-.f64 lambda1 lambda2) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))) (*.f64 (+.f64 phi2 phi1) (+.f64 lambda1 lambda2)))))
(*.f64 R (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2)) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 phi1 phi2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 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 lambda1 lambda2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (-.f64 phi1 phi2)))
(*.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 (neg.f64 R) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(*.f64 R (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (exp.f64 (*.f64 (log.f64 (/.f64 lambda1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)))) #s(literal -1 binary64)))) (neg.f64 lambda1))
(*.f64 (neg.f64 R) (*.f64 lambda2 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(*.f64 R (*.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 R (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) (-.f64 (*.f64 (cos.f64 phi2) (cos.f64 phi1)) (*.f64 (sin.f64 phi2) (sin.f64 phi1))))) (-.f64 lambda1 lambda2))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) lambda1)) (neg.f64 lambda1))
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (neg.f64 lambda1))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (*.f64 R lambda2) (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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))
(*.f64 (-.f64 (*.f64 R (/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.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 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(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) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) lambda1)) (neg.f64 lambda1))
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:

61.0ms
lambda2
58.0ms
phi2
51.0ms
R
42.0ms
lambda1
37.0ms
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
Results
AccuracySegmentsBranch
97.4%1R
97.4%1lambda1
97.4%1lambda2
97.4%1phi1
97.4%1phi2
97.4%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)))))
97.4%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))))
97.4%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)))
97.4%1(-.f64 lambda1 lambda2)
Compiler

Compiled 144 to 79 computations (45.1% saved)

regimes192.0ms (1.1%)

Counts
60 → 2
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 (neg.f64 R) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(*.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 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
(*.f64 R (*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 R (*.f64 (neg.f64 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
Calls

6 calls:

51.0ms
phi2
36.0ms
(-.f64 lambda1 lambda2)
25.0ms
lambda2
17.0ms
R
17.0ms
phi1
Results
AccuracySegmentsBranch
91.5%1R
93.8%2lambda1
91.5%1lambda2
97.3%2phi1
97.3%2phi2
91.5%1(-.f64 lambda1 lambda2)
Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes127.0ms (0.7%)

Counts
59 → 1
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 (neg.f64 R) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(*.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 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
(*.f64 R (*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 R (*.f64 (neg.f64 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
Calls

4 calls:

46.0ms
(-.f64 lambda1 lambda2)
41.0ms
phi1
17.0ms
lambda1
16.0ms
phi2
Results
AccuracySegmentsBranch
91.5%1(-.f64 lambda1 lambda2)
91.5%1lambda1
91.5%1phi1
91.5%1phi2
Compiler

Compiled 26 to 21 computations (19.2% saved)

regimes134.0ms (0.8%)

Counts
58 → 3
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 (neg.f64 R) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(*.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 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
(*.f64 R (*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
(*.f64 R (*.f64 (neg.f64 lambda1) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))))))
Outputs
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))
Calls

6 calls:

30.0ms
phi1
28.0ms
lambda2
20.0ms
phi2
17.0ms
(-.f64 lambda1 lambda2)
16.0ms
lambda1
Results
AccuracySegmentsBranch
87.0%2lambda1
85.2%1phi2
91.1%3lambda2
85.2%1R
85.2%1phi1
85.2%1(-.f64 lambda1 lambda2)
Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes41.0ms (0.2%)

Counts
56 → 2
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 (neg.f64 R) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(*.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 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
(*.f64 R (*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
Outputs
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
Calls

1 calls:

35.0ms
lambda2
Results
AccuracySegmentsBranch
87.0%2lambda2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes60.0ms (0.3%)

Counts
55 → 1
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(*.f64 (neg.f64 R) (*.f64 lambda1 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 (neg.f64 R) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2))
(*.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 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) R) lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
(*.f64 (neg.f64 R) (*.f64 lambda2 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(*.f64 (/.f64 (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))) lambda1) (neg.f64 lambda1))
(*.f64 R (*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 (/.f64 #s(literal 1/2 binary64) phi2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
Outputs
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
Calls

3 calls:

21.0ms
lambda2
18.0ms
R
17.0ms
lambda1
Results
AccuracySegmentsBranch
85.2%1R
85.2%1lambda1
85.2%1lambda2
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes70.0ms (0.4%)

Counts
31 → 2
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda2))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (*.f64 (neg.f64 lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
Outputs
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2))
Calls

6 calls:

18.0ms
phi1
11.0ms
lambda2
10.0ms
R
9.0ms
lambda1
9.0ms
phi2
Results
AccuracySegmentsBranch
81.7%2phi1
73.1%2(-.f64 lambda1 lambda2)
80.9%2phi2
72.3%3lambda2
69.0%2R
71.7%3lambda1
Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes24.0ms (0.1%)

Counts
24 → 2
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
Outputs
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
Calls

2 calls:

14.0ms
phi2
8.0ms
phi1
Results
AccuracySegmentsBranch
80.9%2phi2
70.8%2phi1
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes51.0ms (0.3%)

Counts
23 → 3
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 R phi1) phi1) (/.f64 (*.f64 R phi1) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 phi1 phi1) phi1) (/.f64 (*.f64 R R) R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) R) (/.f64 phi1 phi1)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) R) phi1) (/.f64 phi1 R)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (*.f64 (*.f64 R phi1) phi1) R) (/.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 R lambda2) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 R lambda2)) (*.f64 (*.f64 #s(literal 1/384 binary64) R) (*.f64 lambda2 (*.f64 phi1 phi1))))))
(/.f64 (-.f64 (*.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 (*.f64 R phi1) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))) (*.f64 (*.f64 R (*.f64 phi1 (*.f64 R phi1))) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))))
(*.f64 R (sqrt.f64 (*.f64 phi1 phi1)))
(*.f64 R (sqrt.f64 (*.f64 phi2 phi2)))
Outputs
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
Calls

5 calls:

21.0ms
lambda2
7.0ms
phi2
7.0ms
phi1
7.0ms
lambda1
7.0ms
R
Results
AccuracySegmentsBranch
61.6%3R
62.0%2lambda1
68.0%3lambda2
66.1%3phi1
65.2%3phi2
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes17.0ms (0.1%)

Counts
11 → 3
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 phi1) #s(literal -1/8 binary64))))
Outputs
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
Calls

1 calls:

16.0ms
lambda2
Results
AccuracySegmentsBranch
66.1%3lambda2
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes10.0ms (0.1%)

Counts
7 → 3
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
Outputs
(*.f64 (neg.f64 phi1) R)
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
Calls

3 calls:

3.0ms
lambda2
3.0ms
phi1
3.0ms
phi2
Results
AccuracySegmentsBranch
65.2%3phi2
64.8%3phi1
64.8%3lambda2
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes9.0ms (0.1%)

Counts
6 → 3
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
Outputs
(*.f64 (neg.f64 phi1) R)
(*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))
(*.f64 R phi2)
Calls

3 calls:

3.0ms
phi1
3.0ms
lambda2
3.0ms
phi2
Results
AccuracySegmentsBranch
64.8%3phi1
53.3%5lambda2
62.3%3phi2
Compiler

Compiled 18 to 15 computations (16.7% saved)

regimes15.0ms (0.1%)

Counts
5 → 2
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
(*.f64 (neg.f64 phi1) R)
(-.f64 #s(literal 0 binary64) (*.f64 R lambda1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
Outputs
(*.f64 (neg.f64 phi1) R)
(*.f64 R phi2)
Calls

4 calls:

7.0ms
phi2
3.0ms
R
2.0ms
lambda1
2.0ms
phi1
Results
AccuracySegmentsBranch
38.9%2R
59.3%4phi2
48.8%4lambda1
56.6%2phi1
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes7.0ms (0%)

Counts
2 → 2
Calls
Call 1
Inputs
(*.f64 R lambda2)
(*.f64 R phi2)
Outputs
(*.f64 R lambda2)
(*.f64 R phi2)
Calls

4 calls:

2.0ms
lambda1
2.0ms
phi1
2.0ms
lambda2
2.0ms
phi2
Results
AccuracySegmentsBranch
36.8%2lambda1
44.0%2lambda2
45.4%2phi2
35.7%2phi1
Compiler

Compiled 24 to 20 computations (16.7% saved)

regimes7.0ms (0%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
(*.f64 R lambda2)
Outputs
(*.f64 R lambda2)
Calls

5 calls:

1.0ms
phi2
1.0ms
lambda2
1.0ms
phi1
1.0ms
R
1.0ms
lambda1
Results
AccuracySegmentsBranch
22.8%1phi1
22.8%1lambda1
22.8%1R
22.8%1lambda2
22.8%1phi2
Compiler

Compiled 30 to 25 computations (16.7% saved)

bsearch6.0ms (0%)

Algorithm
1×binary-search
Stop Event
1×predicate-same
Steps
TimeLeftRight
5.0ms
6.054984058568599e-30
1.1940212459366854e-28
Results
3.0ms30×0valid
1.0ms2×1valid
Compiler

Compiled 125 to 80 computations (36% saved)

Precisions
Click to see histograms. Total time spent on operations: 2.0ms
ival-mult: 1.0ms (40.1% of total)
ival-add: 0.0ms (0% of total)
ival-div: 0.0ms (0% of total)
ival-sub: 0.0ms (0% of total)
ival-cos: 0.0ms (0% of total)
const: 0.0ms (0% of total)
ival-sqrt: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

bsearch54.0ms (0.3%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×predicate-same
Steps
TimeLeftRight
24.0ms
6.785376936809348e+155
8.946403867328221e+157
17.0ms
1.3399268677374218e-202
2.292545202997523e-195
Results
19.0ms123×0valid
15.0ms53×1valid
Compiler

Compiled 415 to 284 computations (31.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-div: 7.0ms (27.4% of total)
ival-mult: 7.0ms (27.4% of total)
ival-cos: 4.0ms (15.6% of total)
ival-sub: 3.0ms (11.7% of total)
ival-add: 2.0ms (7.8% of total)
ival-sqrt: 2.0ms (7.8% of total)
backward-pass: 1.0ms (3.9% of total)
const: 0.0ms (0% of total)

bsearch13.0ms (0.1%)

Algorithm
1×binary-search
Stop Event
1×predicate-same
Steps
TimeLeftRight
11.0ms
1.3399268677374218e-202
2.292545202997523e-195
Results
6.0ms55×0valid
3.0ms9×1valid
Compiler

Compiled 177 to 116 computations (34.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 6.0ms
ival-mult: 2.0ms (32.7% of total)
ival-add: 1.0ms (16.3% of total)
ival-div: 1.0ms (16.3% of total)
ival-sub: 1.0ms (16.3% of total)
ival-cos: 1.0ms (16.3% of total)
ival-sqrt: 1.0ms (16.3% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

bsearch36.0ms (0.2%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
31.0ms
-9.130333710382207e+42
-1.6013009392840198e+38
Results
18.0ms61×1valid
8.0ms67×0valid
Compiler

Compiled 253 to 168 computations (33.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 17.0ms
ival-mult: 6.0ms (34.3% of total)
ival-cos: 3.0ms (17.2% of total)
ival-add: 2.0ms (11.4% of total)
ival-sub: 2.0ms (11.4% of total)
ival-div: 1.0ms (5.7% of total)
ival-sqrt: 1.0ms (5.7% of total)
backward-pass: 1.0ms (5.7% of total)
const: 0.0ms (0% of total)

bsearch25.0ms (0.1%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
23.0ms
1.5383827329215294e+52
2.36389856038338e+53
Results
13.0ms48×1valid
6.0ms48×0valid
Compiler

Compiled 213 to 144 computations (32.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 13.0ms
ival-mult: 4.0ms (29.8% of total)
ival-cos: 3.0ms (22.3% of total)
ival-sub: 2.0ms (14.9% of total)
ival-add: 1.0ms (7.4% of total)
ival-div: 1.0ms (7.4% of total)
ival-sqrt: 1.0ms (7.4% of total)
backward-pass: 1.0ms (7.4% of total)
const: 0.0ms (0% of total)

bsearch91.0ms (0.5%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
30.0ms
6.902378041223297e+124
2.0969421457136933e+130
55.0ms
-7.24757018696915e-117
-2.4906554894723162e-123
Results
41.0ms236×0valid
15.0ms52×1valid
Compiler

Compiled 585 to 420 computations (28.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 30.0ms
ival-mult: 12.0ms (39.4% of total)
ival-cos: 5.0ms (16.4% of total)
ival-sub: 4.0ms (13.1% of total)
ival-add: 3.0ms (9.8% of total)
ival-sqrt: 3.0ms (9.8% of total)
ival-div: 2.0ms (6.6% of total)
backward-pass: 1.0ms (3.3% of total)
const: 0.0ms (0% of total)

bsearch72.0ms (0.4%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
41.0ms
6.902378041223297e+124
2.0969421457136933e+130
26.0ms
-7.24757018696915e-117
-2.4906554894723162e-123
Results
35.0ms233×0valid
22.0ms55×1valid
Compiler

Compiled 549 to 384 computations (30.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 43.0ms
ival-mult: 12.0ms (27.9% of total)
ival-add: 10.0ms (23.3% of total)
ival-div: 8.0ms (18.6% of total)
ival-cos: 5.0ms (11.6% of total)
ival-sub: 4.0ms (9.3% of total)
ival-sqrt: 3.0ms (7% of total)
backward-pass: 1.0ms (2.3% of total)
const: 0.0ms (0% of total)

bsearch72.0ms (0.4%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
28.0ms
3.977662327120405e-9
5.63522457852606e-7
39.0ms
2.2596148257732127e-279
2.8450140658613995e-273
Results
31.0ms203×0valid
27.0ms53×1valid
Compiler

Compiled 480 to 349 computations (27.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 45.0ms
ival-sqrt: 22.0ms (48.6% of total)
ival-mult: 8.0ms (17.7% of total)
ival-sub: 4.0ms (8.8% of total)
ival-cos: 4.0ms (8.8% of total)
ival-add: 3.0ms (6.6% of total)
ival-div: 2.0ms (4.4% of total)
backward-pass: 1.0ms (2.2% of total)
const: 0.0ms (0% of total)

bsearch64.0ms (0.4%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
41.0ms
1.2916992405716568e-248
2.6950589228481723e-239
19.0ms
-2.5680938895861043e+49
-1.8533961341837232e+49
Results
35.0ms162×0valid
17.0ms46×1valid
Compiler

Compiled 361 to 262 computations (27.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 42.0ms
ival-mult: 24.0ms (57% of total)
ival-add: 7.0ms (16.6% of total)
ival-cos: 4.0ms (9.5% of total)
ival-sub: 3.0ms (7.1% of total)
ival-div: 2.0ms (4.7% of total)
ival-sqrt: 2.0ms (4.7% of total)
backward-pass: 1.0ms (2.4% of total)
const: 0.0ms (0% of total)

bsearch55.0ms (0.3%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
51.0ms
-1.7362151664198242e+23
-697481328950.1586
Results
35.0ms75×1valid
11.0ms85×0valid
Compiler

Compiled 235 to 174 computations (26% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-div: 15.0ms (41.5% of total)
ival-cos: 6.0ms (16.6% of total)
ival-mult: 6.0ms (16.6% of total)
ival-sub: 3.0ms (8.3% of total)
ival-add: 2.0ms (5.5% of total)
ival-sqrt: 2.0ms (5.5% of total)
backward-pass: 1.0ms (2.8% of total)
const: 0.0ms (0% of total)

bsearch53.0ms (0.3%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
51.0ms
1.5383827329215294e+52
2.36389856038338e+53
Results
22.0ms50×1valid
6.0ms46×0valid
Compiler

Compiled 153 to 108 computations (29.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 22.0ms
ival-mult: 12.0ms (55.4% of total)
ival-cos: 3.0ms (13.9% of total)
ival-add: 2.0ms (9.2% of total)
ival-sub: 2.0ms (9.2% of total)
ival-div: 1.0ms (4.6% of total)
ival-sqrt: 1.0ms (4.6% of total)
backward-pass: 1.0ms (4.6% of total)
const: 0.0ms (0% of total)

simplify71.0ms (0.4%)

Algorithm
1×egg-herbie
Rules
586×distribute-lft-neg-in_binary64
332×neg-mul-1_binary64
282×cancel-sign-sub_binary64
282×neg-sub0_binary64
210×sub-neg_binary64
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
0110315
1164315
2210315
3242315
4261314
5285314
6329314
7398314
8560314
9834314
101056314
111263314
121493314
131584314
141643314
151688314
161714314
171720314
Stop Event
1×saturated
Calls
Call 1
Inputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 8920298079412249/178405961588244985132285746181186892047843328 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 2630067950774187/5260135901548373507240989882880128665550339802823173859498280903068732154297080822113666536277588451226982968856178217713019432250183803863127814770651880849955223671128444598191663757884322717271293251735781376 binary64)) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2))) (if (<=.f64 lambda2 #s(literal 7000000000000000645659903729332342866570367105094536368972896725288501300230954977758367311415912041942768911645886256914863407249315808968237009918524129280 binary64)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) (*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(if (<=.f64 lambda2 #s(literal 8618206661096855/86182066610968551542636378241108028056376767329454880514019834315878107616003372189510312530372009184902888961739623919010110377987011442493486117202360415845666384627768436296772219009176743399772868636439042064384 binary64)) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(if (<=.f64 phi1 #s(literal -45000000000000003180425857343460263067648 binary64)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)))
(if (<=.f64 phi2 #s(literal 33999999999999999769512254928295351199698087026098176 binary64)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 lambda2 #s(literal -1242156022966125/177450860423732151013018507785157357019931972824052260810910693159335763699560039874558361990664932998233037501529828597054346100736 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (if (<=.f64 lambda2 #s(literal 19000000000000000889615947947515193441579650853544786064850712606402773916250315002454303576168976345207631692233491973553755521024 binary64)) (*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))))
(if (<=.f64 lambda2 #s(literal -1242156022966125/177450860423732151013018507785157357019931972824052260810910693159335763699560039874558361990664932998233037501529828597054346100736 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (if (<=.f64 lambda2 #s(literal 389999999999999971600267383192375956101982188402692418473560227948659568342159013443602028211508527253157138161076839554570256384 binary64)) (*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))))
(if (<=.f64 phi2 #s(literal 5875753871270215/2554675596204441358920157072687153364566337613357385653123260470319631221592274004204746195830573697394358331960566393912284720625143799885746139901804584218009607261377389665942448283448784623593796296633016222711463437382554714097777734743613496521609114760800967733302218873894840332707692544 binary64)) (*.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 3872340515953109/18889465931478580854784 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi1 #s(literal -21600000000000000298033102456792409293783388127232 binary64)) (*.f64 (neg.f64 phi1) R) (if (<=.f64 phi1 #s(literal 615015778615681/246006311446272417135694895366447328831463738361430131889861407236509911043906984606020737387080298687645418100644428599105378407753391907201399550988776412284181771799458695654166637769167516870901097035133833253825096549816225533764062867857067136321933279232 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R phi2)))
(if (<=.f64 phi1 #s(literal -200000000000000000000 binary64)) (*.f64 (neg.f64 phi1) R) (*.f64 R phi2))
(if (<=.f64 phi2 #s(literal 61999999999999999579698817810420934540625923400531968 binary64)) (*.f64 R lambda2) (*.f64 R phi2))
(*.f64 R lambda2)
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 8920298079412249/178405961588244985132285746181186892047843328 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 8920298079412249/178405961588244985132285746181186892047843328 binary64)) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 lambda2 #s(literal 2630067950774187/5260135901548373507240989882880128665550339802823173859498280903068732154297080822113666536277588451226982968856178217713019432250183803863127814770651880849955223671128444598191663757884322717271293251735781376 binary64)) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2))) (if (<=.f64 lambda2 #s(literal 7000000000000000645659903729332342866570367105094536368972896725288501300230954977758367311415912041942768911645886256914863407249315808968237009918524129280 binary64)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) (*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi2 phi1))))))))
(if (<=.f64 lambda2 #s(literal 2630067950774187/5260135901548373507240989882880128665550339802823173859498280903068732154297080822113666536277588451226982968856178217713019432250183803863127814770651880849955223671128444598191663757884322717271293251735781376 binary64)) (*.f64 R (hypot.f64 (*.f64 lambda1 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2))) (if (<=.f64 lambda2 #s(literal 7000000000000000645659903729332342866570367105094536368972896725288501300230954977758367311415912041942768911645886256914863407249315808968237009918524129280 binary64)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))) (*.f64 (*.f64 R lambda2) (sqrt.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (+.f64 phi1 phi2))))))))
(if (<=.f64 lambda2 #s(literal 8618206661096855/86182066610968551542636378241108028056376767329454880514019834315878107616003372189510312530372009184902888961739623919010110377987011442493486117202360415845666384627768436296772219009176743399772868636439042064384 binary64)) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(if (<=.f64 lambda2 #s(literal 8618206661096855/86182066610968551542636378241108028056376767329454880514019834315878107616003372189510312530372009184902888961739623919010110377987011442493486117202360415845666384627768436296772219009176743399772868636439042064384 binary64)) (*.f64 R (hypot.f64 (*.f64 lambda1 (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2))))
(*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) (-.f64 phi1 phi2)))
(if (<=.f64 phi1 #s(literal -45000000000000003180425857343460263067648 binary64)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi2)))
(if (<=.f64 phi2 #s(literal 33999999999999999769512254928295351199698087026098176 binary64)) (*.f64 R (hypot.f64 (-.f64 lambda1 lambda2) phi1)) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))))
(if (<=.f64 lambda2 #s(literal -1242156022966125/177450860423732151013018507785157357019931972824052260810910693159335763699560039874558361990664932998233037501529828597054346100736 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (if (<=.f64 lambda2 #s(literal 19000000000000000889615947947515193441579650853544786064850712606402773916250315002454303576168976345207631692233491973553755521024 binary64)) (*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))))
(if (<=.f64 lambda2 #s(literal -1242156022966125/177450860423732151013018507785157357019931972824052260810910693159335763699560039874558361990664932998233037501529828597054346100736 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (if (<=.f64 lambda2 #s(literal 19000000000000000889615947947515193441579650853544786064850712606402773916250315002454303576168976345207631692233491973553755521024 binary64)) (*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))))
(if (<=.f64 lambda2 #s(literal -1242156022966125/177450860423732151013018507785157357019931972824052260810910693159335763699560039874558361990664932998233037501529828597054346100736 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)) (if (<=.f64 lambda2 #s(literal 389999999999999971600267383192375956101982188402692418473560227948659568342159013443602028211508527253157138161076839554570256384 binary64)) (*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2))))))
(if (<=.f64 phi2 #s(literal 5875753871270215/2554675596204441358920157072687153364566337613357385653123260470319631221592274004204746195830573697394358331960566393912284720625143799885746139901804584218009607261377389665942448283448784623593796296633016222711463437382554714097777734743613496521609114760800967733302218873894840332707692544 binary64)) (*.f64 (neg.f64 phi1) R) (if (<=.f64 phi2 #s(literal 3872340515953109/18889465931478580854784 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi2 #s(literal 5875753871270215/2554675596204441358920157072687153364566337613357385653123260470319631221592274004204746195830573697394358331960566393912284720625143799885746139901804584218009607261377389665942448283448784623593796296633016222711463437382554714097777734743613496521609114760800967733302218873894840332707692544 binary64)) (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) (if (<=.f64 phi2 #s(literal 3872340515953109/18889465931478580854784 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))))
(if (<=.f64 phi1 #s(literal -21600000000000000298033102456792409293783388127232 binary64)) (*.f64 (neg.f64 phi1) R) (if (<=.f64 phi1 #s(literal 615015778615681/246006311446272417135694895366447328831463738361430131889861407236509911043906984606020737387080298687645418100644428599105378407753391907201399550988776412284181771799458695654166637769167516870901097035133833253825096549816225533764062867857067136321933279232 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R phi2)))
(if (<=.f64 phi1 #s(literal -21600000000000000298033102456792409293783388127232 binary64)) (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) (if (<=.f64 phi1 #s(literal 615015778615681/246006311446272417135694895366447328831463738361430131889861407236509911043906984606020737387080298687645418100644428599105378407753391907201399550988776412284181771799458695654166637769167516870901097035133833253825096549816225533764062867857067136321933279232 binary64)) (*.f64 R (*.f64 lambda2 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)))) (*.f64 R phi2)))
(if (<=.f64 phi1 #s(literal -200000000000000000000 binary64)) (*.f64 (neg.f64 phi1) R) (*.f64 R phi2))
(if (<=.f64 phi1 #s(literal -200000000000000000000 binary64)) (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) (*.f64 R phi2))
(if (<=.f64 phi2 #s(literal 61999999999999999579698817810420934540625923400531968 binary64)) (*.f64 R lambda2) (*.f64 R phi2))
(*.f64 R lambda2)

soundness3.0s (17.4%)

Rules
7968×*-lowering-*.f32
7968×*-lowering-*.f64
6992×*-lowering-*.f32
6992×*-lowering-*.f64
6740×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
039211
1174193
21430190
08604190
017106
190106
2777106
08467106
0103015442
1377113963
0856013963
01716
13616
28716
332216
4152816
5510616
0810316
0169616680
1601915185
0815715185
099810796
135859660
083529660
090015458
1321212836
0833412836
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 1615 to 995 computations (38.4% saved)

preprocess147.0ms (0.9%)

Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 1100 to 502 computations (54.4% saved)

end0.0ms (0%)

Profiling

Loading profile data...