Equirectangular approximation to distance on a great circle

Time bar (total: 18.9s)

analyze792.0ms (4.2%)

Algorithm
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: 382.0ms
ival-mult: 176.0ms (46.1% of total)
ival-sqrt: 61.0ms (16% of total)
ival-sub: 43.0ms (11.3% of total)
ival-add: 35.0ms (9.2% of total)
ival-cos: 33.0ms (8.6% of total)
ival-div: 28.0ms (7.3% of total)
const: 4.0ms (1% of total)
backward-pass: 2.0ms (0.5% of total)

sample2.4s (12.9%)

Results
1.0s6110×0valid
892.0ms2146×1valid
Precisions
Click to see histograms. Total time spent on operations: 1.3s
ival-mult: 397.0ms (29.4% of total)
ival-cos: 342.0ms (25.3% of total)
ival-sub: 229.0ms (17% of total)
ival-add: 147.0ms (10.9% of total)
ival-sqrt: 82.0ms (6.1% of total)
ival-div: 81.0ms (6% of total)
backward-pass: 58.0ms (4.3% of total)
const: 13.0ms (1% of total)
Bogosity

preprocess223.0ms (1.2%)

Algorithm
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
iter limit
node limit
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)

explain403.0ms (2.1%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1720-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))))
62134(6.73333587375337e-70 -9.660364514800443e-277 4.06696835193149e-111 -6.484633455391657e-238 3.5051465099114883e+298)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
226.0ms368×1valid
69.0ms144×0valid
Compiler

Compiled 359 to 53 computations (85.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 108.0ms
ival-mult: 28.0ms (25.8% of total)
backward-pass: 26.0ms (24% of total)
ival-cos: 19.0ms (17.5% of total)
ival-sub: 11.0ms (10.2% of total)
ival-add: 9.0ms (8.3% of total)
ival-div: 7.0ms (6.5% of total)
ival-sqrt: 7.0ms (6.5% of total)
const: 1.0ms (0.9% of total)

eval0.0ms (0%)

Compiler

Compiled 21 to 14 computations (33.3% saved)

prune1.0ms (0%)

Alt Table
Click to see full alt table
StatusAccuracyProgram
98.6%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
Compiler

Compiled 21 to 14 computations (33.3% saved)

simplify185.0ms (1%)

Algorithm
egg-herbie
Localize:

Found 4 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)))
Rules
2168×+-lowering-+.f64
2168×+-lowering-+.f32
1824×unsub-neg
1560×*-lowering-*.f32
1560×*-lowering-*.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01766
13666
28766
332266
4152866
5510666
0810366
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
(- lambda1 lambda2)
lambda1
lambda2
(cos (/ (+ phi1 phi2) 2))
(/ (+ phi1 phi2) 2)
(+ phi1 phi2)
phi1
phi2
2
(- phi1 phi2)
Outputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(cos (/ (+ phi1 phi2) 2))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
(/ (+ phi1 phi2) 2)
(/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
2
#s(literal 2 binary64)
(- phi1 phi2)
(-.f64 phi1 phi2)

localize160.0ms (0.8%)

Localize:

Found 4 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.7%
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
accuracy79.7%
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
Results
126.0ms187×1valid
14.0ms69×0valid
Compiler

Compiled 72 to 15 computations (79.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 66.0ms
compiled-spec: 17.0ms (25.7% of total)
ival-mult: 13.0ms (19.6% of total)
ival-cos: 9.0ms (13.6% of total)
backward-pass: 8.0ms (12.1% of total)
ival-sub: 6.0ms (9.1% of total)
ival-add: 5.0ms (7.6% of total)
ival-sqrt: 5.0ms (7.6% of total)
ival-div: 4.0ms (6% of total)
const: 1.0ms (1.5% of total)

series54.0ms (0.3%)

Counts
5 → 204
Calls
Call 1
Inputs
#<alt (* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))>
#<alt (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))>
#<alt (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))>
#<alt (- lambda1 lambda2)>
#<alt (cos (/ (+ phi1 phi2) 2))>
Outputs
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))>
#<alt (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))>
#<alt (* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))>
#<alt (+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))>
#<alt (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))>
#<alt (* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))>
#<alt (+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))>
#<alt (* R phi1)>
#<alt (* phi1 (+ R (* -1 (/ (* R phi2) phi1))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))>
#<alt (* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))>
#<alt (* -1 (* R phi1))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))>
#<alt (* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))>
#<alt (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))>
#<alt (+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt (* R phi2)>
#<alt (* phi2 (+ R (* -1 (/ (* R phi1) phi2))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))>
#<alt (* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))>
#<alt (* -1 (* R phi2))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))>
#<alt (* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))>
#<alt (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))>
#<alt (* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))>
#<alt (* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))>
#<alt (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))>
#<alt (+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))>
#<alt (* lambda2 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))>
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))>
#<alt (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))>
#<alt phi1>
#<alt (* phi1 (+ 1 (* -1 (/ phi2 phi1))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))>
#<alt (* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (* -1 phi1)>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))>
#<alt (* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))>
#<alt (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))>
#<alt (+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))>
#<alt phi2>
#<alt (* phi2 (+ 1 (* -1 (/ phi1 phi2))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))>
#<alt (* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))>
#<alt (* -1 phi2)>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))>
#<alt (* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))>
#<alt (* lambda1 (cos (* 1/2 (+ phi1 phi2))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))>
#<alt (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))>
#<alt (* (cos (* 1/2 phi2)) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))>
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))>
#<alt (+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 phi1)) (- lambda1 lambda2))>
#<alt (+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))>
#<alt (* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt (- lambda1 lambda2)>
#<alt lambda1>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt (* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))>
#<alt lambda1>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt (* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))>
#<alt lambda1>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (+ lambda1 (* -1 lambda2))>
#<alt (* -1 lambda2)>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* lambda2 (- (/ lambda1 lambda2) 1))>
#<alt (* -1 lambda2)>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))>
#<alt (cos (* 1/2 phi2))>
#<alt (+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 (- phi2 (* -1 phi1))))>
#<alt (cos (* 1/2 phi1))>
#<alt (+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (+ phi1 phi2)))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
#<alt (cos (* 1/2 (- phi1 (* -1 phi2))))>
Calls

51 calls:

TimeVariablePointExpression
8.0ms
phi1
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
3.0ms
R
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
3.0ms
lambda2
@-inf
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
2.0ms
phi2
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
2.0ms
lambda1
@0
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))

rewrite383.0ms (2%)

Algorithm
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
01749
19049
277749
0846749
Stop Event
iter limit
node limit
Counts
5 → 103
Calls
Call 1
Inputs
(* R (sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2))) (* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))) (* (- phi1 phi2) (- phi1 phi2))))
(* (- lambda1 lambda2) (cos (/ (+ phi1 phi2) 2)))
(- lambda1 lambda2)
(cos (/ (+ phi1 phi2) 2))
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)) R)
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2))
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))))) (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))))
(/.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))))))
(/.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 6 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64))
(*.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))))))) #s(literal 1/2 binary64)))
(*.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))))))))
(*.f64 (hypot.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2)))))))))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))))
(*.f64 (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1 binary64))))) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1))
(+.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) #s(literal 1 binary64)))
(fma.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 lambda1 lambda2) (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (+.f64 lambda1 lambda2))
(/.f64 (neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) #s(literal 3 binary64)) (pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1)) (-.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))))))
(/.f64 (+.f64 (pow.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1)) (*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))) (-.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) lambda2))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (-.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))))
(pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1 binary64))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 lambda1 lambda2))
(*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)) (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) #s(literal 1 binary64)) (pow.f64 (-.f64 lambda1 lambda2) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(+.f64 lambda1 (-.f64 #s(literal 0 binary64) lambda2))
(+.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)
(+.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (neg.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(+.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (neg.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(-.f64 lambda1 lambda2)
(-.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(-.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))
(fma.f64 #s(literal -1 binary64) lambda2 lambda1)
(neg.f64 (/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(neg.f64 (/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))))
(/.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (+.f64 lambda1 lambda2))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (neg.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)))))
(/.f64 (+.f64 (neg.f64 (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2)) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (*.f64 (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(/.f64 (-.f64 (*.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (*.f64 (+.f64 lambda1 lambda2) (*.f64 lambda2 lambda2))) (*.f64 (+.f64 lambda1 lambda2) (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 (*.f64 lambda2 lambda2) (-.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (+.f64 (*.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (+.f64 (*.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))) (*.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (*.f64 lambda2 lambda2) (*.f64 lambda1 lambda1)) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))) (*.f64 (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))) (+.f64 (/.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))) (/.f64 (*.f64 lambda2 (*.f64 lambda2 lambda2)) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2))) (*.f64 (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2)))) (+.f64 (/.f64 (*.f64 lambda1 lambda1) (+.f64 lambda1 lambda2)) (/.f64 (*.f64 lambda2 lambda2) (+.f64 lambda1 lambda2))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2)))))
(*.f64 (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 #s(literal 0 binary64) lambda2) lambda1)))))
(*.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
(*.f64 (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))))
(*.f64 (+.f64 (neg.f64 (*.f64 lambda1 lambda1)) (*.f64 lambda2 lambda2)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 lambda1 lambda2))))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal -2 binary64)))

simplify441.0ms (2.3%)

Algorithm
egg-herbie
Rules
7318×*-lowering-*.f32
7318×*-lowering-*.f64
3936×+-lowering-+.f64
3936×+-lowering-+.f32
1824×fma-lowering-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
07456936
126155722
084985722
Stop Event
iter limit
node limit
Counts
204 → 204
Calls
Call 1
Inputs
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(* -1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
(- lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
lambda1
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(+ lambda1 (* -1 lambda2))
(* -1 lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* lambda2 (- (/ lambda1 lambda2) 1))
(* -1 lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
Outputs
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda1)) (*.f64 R (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 R)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))) (*.f64 R (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))))
(* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(*.f64 lambda1 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 lambda1 (+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(*.f64 lambda1 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 R)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R)) (*.f64 lambda1 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) lambda1)) lambda1)) (neg.f64 lambda1))
(* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda1))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 R))) (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 R)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (+.f64 (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))) lambda2)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 R))))))
(* R (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2))))))
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 lambda2 (+.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))) (* R (cos (* 1/2 (+ phi1 phi2))))))))
(*.f64 lambda2 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 R (*.f64 lambda2 (*.f64 lambda2 lambda2))) (/.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R)) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2))))
(* -1 (* R (* lambda2 (cos (* 1/2 (+ phi1 phi2))))))
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) R))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* R (cos (* 1/2 (+ phi1 phi2)))))))
(*.f64 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (*.f64 R (*.f64 phi1 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) #s(literal 1/2 binary64))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) phi1)))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 phi1 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 R phi1)) (*.f64 R (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))))) phi1)))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 R #s(literal 1/2 binary64))) (*.f64 phi1 phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1)))))))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi1)) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (-.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1)))) phi1)) phi1)))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi2) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (*.f64 phi2 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 (+.f64 (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (*.f64 (*.f64 R phi2) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/6 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (*.f64 R (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))) phi2)))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(*.f64 phi2 (+.f64 R (-.f64 (/.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 R #s(literal 1/2 binary64))) (*.f64 phi2 phi2)) (/.f64 (*.f64 R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 phi1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (*.f64 phi2 phi2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))))
(* -1 (* R phi2))
(-.f64 #s(literal 0 binary64) (*.f64 R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) phi2)) phi2)))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)))) phi2)) phi2)))
(sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (*.f64 lambda2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))) (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64)))))))))))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1))))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(*.f64 lambda1 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) lambda2)) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1)))))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1))))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))) lambda1)) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda1)) (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) lambda1)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 lambda2 lambda1) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda1)) lambda1)) (neg.f64 lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (cos (* 1/2 (+ phi1 phi2))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda2 lambda1)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda1)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (- (pow (cos (* 1/2 (+ phi1 phi2))) 2) (/ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 4)) (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (cos (* 1/2 (+ phi1 phi2))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (+.f64 (neg.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda1)) (*.f64 #s(literal 1/2 binary64) (*.f64 lambda2 (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))))) (*.f64 lambda2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) #s(literal 1/2 binary64)))))))
(* lambda2 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2))))
(*.f64 lambda2 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2)))))))))
(*.f64 lambda2 (+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2))))
(* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (+ (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (cos (* 1/2 (+ phi1 phi2))))))))))
(*.f64 lambda2 (+.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (/.f64 lambda1 (*.f64 lambda2 (*.f64 lambda2 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2)))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (cos (* 1/2 (+ phi1 phi2)))))) lambda2)) (* lambda1 (cos (* 1/2 (+ phi1 phi2))))) lambda2)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 lambda1 lambda2) #s(literal 1 binary64)) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (*.f64 phi1 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) #s(literal 1/2 binary64))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))))) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) phi1)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))) (*.f64 phi1 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2)))) (+.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal 1/6 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 phi2 phi2))))))) phi1)))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)) #s(literal 1/2 binary64)))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 phi1))))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1)) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (cos (* 1/2 (- phi2 (* -1 phi1)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi2 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))) phi1)) phi1)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (*.f64 phi2 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) phi2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 phi2 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 1/2 binary64))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/6 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (-.f64 lambda1 lambda2) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) #s(literal 2 binary64))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (cos (* 1/2 (+ phi1 phi2))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (/.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (*.f64 phi2 phi2)))) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 phi2 phi2)))))))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(*.f64 phi2 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2)) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (cos (* 1/2 (- phi1 (* -1 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2))) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 phi1 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi2))) phi2)) phi2)))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))
(* lambda1 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(*.f64 lambda1 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1)))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* -1 (* lambda1 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda2 (cos (* 1/2 (+ phi1 phi2)))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda2) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (neg.f64 lambda1))
(* lambda1 (cos (* 1/2 (+ phi1 phi2))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1)
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(+ (* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2))))) (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* lambda2 (+ (* -1 (cos (* 1/2 (+ phi1 phi2)))) (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* lambda2 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (cos (* 1/2 (+ phi1 phi2))) (* -1 (/ (* lambda1 (cos (* 1/2 (+ phi1 phi2)))) lambda2)))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) phi1)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (*.f64 phi1 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64)))))))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 #s(literal 1/48 binary64))))))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi2 (* -1 phi1)))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64)))))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal -1/8 binary64) phi2)))))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/2 binary64))) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) #s(literal -1/8 binary64))) (*.f64 #s(literal 1/48 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) phi2))))))))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (+ phi1 phi2))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 (- phi1 (* -1 phi2)))) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 lambda1 lambda2))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
(* lambda1 (+ 1 (* -1 (/ lambda2 lambda1))))
(*.f64 lambda1 (-.f64 #s(literal 1 binary64) (/.f64 lambda2 lambda1)))
lambda1
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))))
(* -1 (* lambda1 (- (/ lambda2 lambda1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 lambda1 (+.f64 (/.f64 lambda2 lambda1) #s(literal -1 binary64))))
lambda1
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(+ lambda1 (* -1 lambda2))
(-.f64 lambda1 lambda2)
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* lambda2 (- (/ lambda1 lambda2) 1))
(*.f64 lambda2 (+.f64 (/.f64 lambda1 lambda2) #s(literal -1 binary64)))
(* -1 lambda2)
(-.f64 #s(literal 0 binary64) lambda2)
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(* -1 (* lambda2 (+ 1 (* -1 (/ lambda1 lambda2)))))
(*.f64 lambda2 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 lambda1 lambda2)) #s(literal -1 binary64)))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal -1/2 binary64))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) phi1)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal -1/2 binary64))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 #s(literal -1/8 binary64) phi2)) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 #s(literal 1/48 binary64))))) (*.f64 #s(literal -1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))

eval42.0ms (0.2%)

Compiler

Compiled 12072 to 1229 computations (89.8% saved)

prune83.0ms (0.4%)

Pruning

18 alts after pruning (18 fresh and 0 done)

PrunedKeptTotal
New28918307
Fresh000
Picked101
Done000
Total29018308
Accuracy
98.7%
Counts
308 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
20.3%
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
60.9%
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
32.4%
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
10.7%
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
22.0%
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
9.0%
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
58.5%
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
36.5%
(*.f64 lambda2 (-.f64 (*.f64 R (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))) (/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)) lambda2)))
98.6%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
92.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
94.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
15.0%
(*.f64 R (/.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)))))))))
57.5%
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
10.7%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
20.3%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
9.0%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
57.8%
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
36.5%
(*.f64 R phi2)
Compiler

Compiled 716 to 458 computations (36% saved)

simplify182.0ms (1%)

Algorithm
egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
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 R lambda1))
cost-diff0
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
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 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
cost-diff0
(-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))
cost-diff256
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
cost-diff384
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
cost-diff384
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
cost-diff0
(*.f64 R phi2)
cost-diff0
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
cost-diff128
(/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
cost-diff128
(hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))
cost-diff128
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
Rules
2034×*-lowering-*.f32
2034×*-lowering-*.f64
1694×fma-define
1688×+-lowering-+.f64
1688×+-lowering-+.f32
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
034189
183186
2197186
3596184
42100176
56747176
08042176
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* R (sqrt (+ (* (/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2))) (/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2))) (/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
(/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2)))
(cos (/ (+ phi1 phi2) 2))
(/ (+ phi1 phi2) 2)
(+ phi1 phi2)
phi1
phi2
2
(/ 1 (- lambda1 lambda2))
1
(- lambda1 lambda2)
lambda1
lambda2
(- phi1 phi2)
(* R phi2)
R
phi2
(* R (- 0 (* phi1 (- 1 (/ phi2 phi1)))))
R
(- 0 (* phi1 (- 1 (/ phi2 phi1))))
0
(* phi1 (- 1 (/ phi2 phi1)))
phi1
(- 1 (/ phi2 phi1))
1
(/ phi2 phi1)
phi2
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2))
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
1/2
(+ phi1 phi2)
phi1
phi2
(* R lambda2)
R
lambda2
(- 0 (* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1)))
0
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1))
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
1/2
(+ phi1 phi2)
phi1
phi2
(* R lambda1)
R
lambda1
Outputs
(* R (sqrt (+ (* (/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2))) (/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2))) (/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))
(/ (cos (/ (+ phi1 phi2) 2)) (/ 1 (- lambda1 lambda2)))
(*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 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)
(/ 1 (- lambda1 lambda2))
(/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
1
#s(literal 1 binary64)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(- phi1 phi2)
(-.f64 phi1 phi2)
(* R phi2)
(*.f64 R phi2)
R
phi2
(* R (- 0 (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 R (-.f64 phi2 phi1))
R
(- 0 (* phi1 (- 1 (/ phi2 phi1))))
(-.f64 phi2 phi1)
0
#s(literal 0 binary64)
(* phi1 (- 1 (/ phi2 phi1)))
(-.f64 phi1 phi2)
phi1
(- 1 (/ phi2 phi1))
(-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))
1
#s(literal 1 binary64)
(/ phi2 phi1)
(/.f64 phi2 phi1)
phi2
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 R lambda2))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64)))
(* 1/2 (+ phi1 phi2))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
(* R lambda2)
(*.f64 R lambda2)
R
lambda2
(- 0 (* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1)))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)))
0
#s(literal 0 binary64)
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda1))
(*.f64 (cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))) (*.f64 R lambda1))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64)))
(* 1/2 (+ phi1 phi2))
(*.f64 (+.f64 phi1 phi2) #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
(+ phi1 phi2)
(+.f64 phi1 phi2)
phi1
phi2
(* R lambda1)
(*.f64 R lambda1)
R
lambda1

localize481.0ms (2.5%)

Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(*.f64 R lambda1)
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
accuracy99.7%
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1))
accuracy79.7%
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
accuracy100.0%
(*.f64 R lambda2)
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
accuracy99.7%
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda2))
accuracy79.7%
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
accuracy100.0%
(-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))
accuracy100.0%
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
accuracy100.0%
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
accuracy84.9%
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
accuracy100.0%
(*.f64 R phi2)
accuracy100.0%
(/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
accuracy99.9%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
accuracy99.6%
(/.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
accuracy79.7%
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
Results
361.0ms189×1valid
44.0ms67×0valid
Compiler

Compiled 206 to 32 computations (84.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 214.0ms
ival-mult: 70.0ms (32.7% of total)
compiled-spec: 43.0ms (20.1% of total)
ival-cos: 39.0ms (18.2% of total)
backward-pass: 16.0ms (7.5% of total)
ival-add: 14.0ms (6.5% of total)
ival-div: 14.0ms (6.5% of total)
ival-sub: 13.0ms (6.1% of total)
ival-sqrt: 4.0ms (1.9% of total)
const: 1.0ms (0.5% of total)

series63.0ms (0.3%)

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

150 calls:

TimeVariablePointExpression
18.0ms
phi1
@inf
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2))
6.0ms
lambda2
@inf
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2))
1.0ms
R
@0
(* R (- 0 (* phi1 (- 1 (/ phi2 phi1)))))
1.0ms
lambda2
@0
(* (cos (* 1/2 (+ phi1 phi2))) (* R lambda2))
1.0ms
phi2
@inf
(* R (- 0 (* phi1 (- 1 (/ phi2 phi1)))))

rewrite478.0ms (2.5%)

Algorithm
batch-egg-rewrite
Rules
5010×*-lowering-*.f32
5010×*-lowering-*.f64
2782×/-lowering-/.f32
2782×/-lowering-/.f64
2402×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

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

simplify530.0ms (2.8%)

Algorithm
egg-herbie
Rules
6574×*-lowering-*.f32
6574×*-lowering-*.f64
4904×+-lowering-+.f64
4904×+-lowering-+.f32
1218×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

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

eval205.0ms (1.1%)

Compiler

Compiled 23045 to 2262 computations (90.2% saved)

prune168.0ms (0.9%)

Pruning

35 alts after pruning (34 fresh and 1 done)

PrunedKeptTotal
New1041241065
Fresh31013
Picked415
Done000
Total1048351083
Accuracy
100.0%
Counts
1083 → 35
Alt Table
Click to see full alt table
StatusAccuracyProgram
11.7%
(/.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 R lambda1)))
31.8%
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) R) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
15.1%
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) R) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
20.1%
(-.f64 #s(literal 0 binary64) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (*.f64 R lambda1)))
10.8%
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi1 phi2))) #s(literal -1 binary64)))) (*.f64 R lambda1)))
32.4%
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
57.7%
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (*.f64 R (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
57.3%
(*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
20.3%
(*.f64 (*.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 lambda1))
22.0%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
23.9%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
10.7%
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
19.8%
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
19.1%
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
58.5%
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
56.4%
(*.f64 phi1 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 phi2 phi1))))
99.9%
(*.f64 R (hypot.f64 (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
92.9%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
92.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
94.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
15.0%
(*.f64 R (/.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)))))))))
32.6%
(*.f64 R (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
42.7%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
37.5%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
32.6%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
16.6%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
63.5%
(*.f64 R (-.f64 phi2 phi1))
57.5%
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi2 (+.f64 (/.f64 #s(literal 1 binary64) phi2) (/.f64 #s(literal -1 binary64) phi1))))))
32.6%
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
16.6%
(*.f64 R (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
10.7%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
20.3%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
9.0%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
57.8%
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
36.5%
(*.f64 R phi2)
Compiler

Compiled 1716 to 982 computations (42.8% saved)

simplify228.0ms (1.2%)

Algorithm
egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
cost-diff0
(+.f64 phi1 phi2)
cost-diff0
(/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))
cost-diff0
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
cost-diff0
(*.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
cost-diff128
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
cost-diff2048
(/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))
cost-diff2176
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
cost-diff2304
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
cost-diff0
(-.f64 #s(literal 0 binary64) phi1)
cost-diff128
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2))))
cost-diff128
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
cost-diff128
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
cost-diff0
(-.f64 phi2 phi1)
cost-diff0
(*.f64 R (-.f64 phi2 phi1))
cost-diff0
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
cost-diff128
(/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
cost-diff128
(hypot.f64 (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))
cost-diff128
(*.f64 R (hypot.f64 (/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
Rules
3066×*-lowering-*.f32
3066×*-lowering-*.f64
2142×fma-lowering-fma.f32
2142×fma-lowering-fma.f64
1970×fma-define
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
053528
1140454
2521367
34743347
08647347
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* R (sqrt (+ (* (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2))) (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2))) (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
(/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))
(- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))
(* (cos (* phi2 1/2)) (cos (* phi1 1/2)))
(cos (* phi2 1/2))
(* phi2 1/2)
phi2
1/2
(cos (* phi1 1/2))
(* phi1 1/2)
phi1
(* (sin (* phi2 1/2)) (sin (* phi1 1/2)))
(sin (* phi2 1/2))
(sin (* phi1 1/2))
(/ 1 (- lambda1 lambda2))
1
(- lambda1 lambda2)
lambda1
lambda2
(- phi1 phi2)
(* R (- phi2 phi1))
R
(- phi2 phi1)
phi2
phi1
(* R (/ (* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))) (+ 1 (/ phi2 phi1))))
R
(/ (* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))) (+ 1 (/ phi2 phi1)))
(* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2))))
(- 0 phi1)
0
phi1
(- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))
1
(/ (/ phi2 phi1) (/ phi1 phi2))
(/ phi2 phi1)
phi2
(/ phi1 phi2)
(+ 1 (/ phi2 phi1))
(* R (/ 1 (/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))))
R
(/ 1 (/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))))
1
(/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))
(* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))
phi1
(* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))
(- 1 (/ phi2 phi1))
(/ phi2 phi1)
phi2
(* phi1 (- 1 (/ phi2 phi1)))
(* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))
(* (- 1 (/ phi2 phi1)) (- 0 phi1))
(- 0 phi1)
0
(* (* R (cos (/ (+ phi1 phi2) 2))) (neg lambda1))
(* R (cos (/ (+ phi1 phi2) 2)))
R
(cos (/ (+ phi1 phi2) 2))
(/ (+ phi1 phi2) 2)
(+ phi1 phi2)
phi1
phi2
2
(neg lambda1)
lambda1
Outputs
(* R (sqrt (+ (* (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2))) (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2))) (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))
(/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(* (cos (* phi2 1/2)) (cos (* phi1 1/2)))
(*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(cos (* phi2 1/2))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(* phi2 1/2)
(*.f64 phi2 #s(literal 1/2 binary64))
phi2
1/2
#s(literal 1/2 binary64)
(cos (* phi1 1/2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* phi1 1/2)
(*.f64 #s(literal 1/2 binary64) phi1)
phi1
(* (sin (* phi2 1/2)) (sin (* phi1 1/2)))
(*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(sin (* phi2 1/2))
(sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(sin (* phi1 1/2))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(/ 1 (- lambda1 lambda2))
(/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
1
#s(literal 1 binary64)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(- phi1 phi2)
(-.f64 phi1 phi2)
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
R
(- phi2 phi1)
(-.f64 phi2 phi1)
phi2
phi1
(* R (/ (* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))) (+ 1 (/ phi2 phi1))))
(*.f64 (-.f64 (/.f64 (*.f64 phi1 (/.f64 phi2 phi1)) (/.f64 phi1 phi2)) phi1) (/.f64 R (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
R
(/ (* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))) (+ 1 (/ phi2 phi1)))
(/.f64 (-.f64 (/.f64 (*.f64 phi1 (/.f64 phi2 phi1)) (/.f64 phi1 phi2)) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2))))
(-.f64 (/.f64 (*.f64 phi1 (/.f64 phi2 phi1)) (/.f64 phi1 phi2)) phi1)
(- 0 phi1)
(-.f64 #s(literal 0 binary64) phi1)
0
#s(literal 0 binary64)
phi1
(- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))
(-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))
1
#s(literal 1 binary64)
(/ (/ phi2 phi1) (/ phi1 phi2))
(/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))
(/ phi2 phi1)
(/.f64 phi2 phi1)
phi2
(/ phi1 phi2)
(/.f64 phi1 phi2)
(+ 1 (/ phi2 phi1))
(+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))
(* R (/ 1 (/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))))
(/.f64 R (/.f64 (/.f64 #s(literal -1 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
R
(/ 1 (/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))))
(-.f64 (*.f64 phi1 (/.f64 phi2 phi1)) phi1)
1
#s(literal 1 binary64)
(/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))
(/.f64 (/.f64 #s(literal -1 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 phi1)))
phi1
(* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(- 1 (/ phi2 phi1))
(-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))
(/ phi2 phi1)
(/.f64 phi2 phi1)
phi2
(* phi1 (- 1 (/ phi2 phi1)))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))
(*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 (*.f64 phi1 (/.f64 phi2 phi1)) phi1)))))
(* (- 1 (/ phi2 phi1)) (- 0 phi1))
(-.f64 (*.f64 phi1 (/.f64 phi2 phi1)) phi1)
(- 0 phi1)
(-.f64 #s(literal 0 binary64) phi1)
0
#s(literal 0 binary64)
(* (* R (cos (/ (+ phi1 phi2) 2))) (neg lambda1))
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 R lambda1)))
(* R (cos (/ (+ phi1 phi2) 2)))
(*.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))))
R
(cos (/ (+ phi1 phi2) 2))
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(/ (+ phi1 phi2) 2)
(/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))
(+ phi1 phi2)
(+.f64 phi2 phi1)
phi1
phi2
2
#s(literal 2 binary64)
(neg lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
lambda1

localize752.0ms (4%)

Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(neg.f64 lambda1)
accuracy99.7%
(*.f64 (*.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 lambda1))
accuracy99.7%
(*.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))
accuracy79.7%
(cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))
accuracy93.7%
(*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
accuracy84.9%
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
accuracy84.9%
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
accuracy36.7%
(/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))
accuracy100.0%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
accuracy99.8%
(/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2))
accuracy93.0%
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2))))
accuracy74.2%
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
accuracy100.0%
(-.f64 phi2 phi1)
accuracy100.0%
(*.f64 R (-.f64 phi2 phi1))
accuracy99.9%
(*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64))))
accuracy99.8%
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64)))))
accuracy99.6%
(*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))
accuracy99.6%
(/.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 phi1 #s(literal 1/2 binary64)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
Results
542.0ms188×1valid
95.0ms67×0valid
3.0ms3valid
Compiler

Compiled 521 to 51 computations (90.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 342.0ms
ival-mult: 95.0ms (27.8% of total)
ival-sub: 57.0ms (16.7% of total)
ival-cos: 49.0ms (14.3% of total)
backward-pass: 43.0ms (12.6% of total)
ival-div: 38.0ms (11.1% of total)
compiled-spec: 26.0ms (7.6% of total)
ival-sin: 21.0ms (6.1% of total)
ival-add: 6.0ms (1.8% of total)
ival-sqrt: 4.0ms (1.2% of total)
ival-neg: 2.0ms (0.6% of total)
const: 1.0ms (0.3% of total)

series131.0ms (0.7%)

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

189 calls:

TimeVariablePointExpression
31.0ms
phi1
@inf
(sqrt (+ (* (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2))) (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
13.0ms
phi2
@0
(* R (/ (* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))) (+ 1 (/ phi2 phi1))))
8.0ms
phi2
@0
(* (* R (cos (/ (+ phi1 phi2) 2))) (neg lambda1))
6.0ms
R
@0
(* R (sqrt (+ (* (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2))) (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
4.0ms
phi2
@inf
(* R (/ (* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))) (+ 1 (/ phi2 phi1))))

rewrite705.0ms (3.7%)

Algorithm
batch-egg-rewrite
Rules
3300×*-lowering-*.f32
3300×*-lowering-*.f64
2412×fma-lowering-fma.f32
2412×fma-lowering-fma.f64
1794×/-lowering-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
053386
1316260
23128260
08491260
Stop Event
iter limit
node limit
Counts
26 → 780
Calls
Call 1
Inputs
(* R (sqrt (+ (* (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2))) (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(sqrt (+ (* (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2))) (/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
(/ (- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2)))) (/ 1 (- lambda1 lambda2)))
(- (* (cos (* phi2 1/2)) (cos (* phi1 1/2))) (* (sin (* phi2 1/2)) (sin (* phi1 1/2))))
(* R (- phi2 phi1))
(- phi2 phi1)
(* R (/ (* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))) (+ 1 (/ phi2 phi1))))
(/ (* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2)))) (+ 1 (/ phi2 phi1)))
(* (- 0 phi1) (- 1 (/ (/ phi2 phi1) (/ phi1 phi2))))
(- 0 phi1)
(/ 1 (/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))))
(* R (/ 1 (/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))))
(/ (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))
(* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))
(* R (cos (/ (+ phi1 phi2) 2)))
(cos (/ (+ phi1 phi2) 2))
(/ (+ phi1 phi2) 2)
(+ phi1 phi2)
(* (sin (* phi2 1/2)) (sin (* phi1 1/2)))
(* (cos (* phi2 1/2)) (cos (* phi1 1/2)))
(/ (/ phi2 phi1) (/ phi1 phi2))
(* phi1 (- 1 (/ phi2 phi1)))
(* (- 1 (/ phi2 phi1)) (- 0 phi1))
(* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))
(* (* R (cos (/ (+ phi1 phi2) 2))) (neg lambda1))
(neg lambda1)
Outputs
(*.f64 R (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 (hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)) R)
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))
(hypot.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)))
(hypot.f64 (-.f64 phi1 phi2) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)))
(hypot.f64 (pow.f64 (-.f64 phi1 phi2) #s(literal 1 binary64)) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)))
(sqrt.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) #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 (pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))) (sqrt.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) #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)))))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) #s(literal 4 binary64)) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) #s(literal 1/2 binary64)))
(+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(+.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda1) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(+.f64 (*.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64))))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64))))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)))))
(+.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64))))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64))))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64))))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64))))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64))))) (fma.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (*.f64 (-.f64 lambda1 lambda2) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64))))) (fma.f64 (neg.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (*.f64 (/.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (/.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)))))
(+.f64 (fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64))))) (fma.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2))) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(fma.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) lambda1 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda2)))
(fma.f64 lambda1 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))
(fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(fma.f64 (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(fma.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1 binary64)) (/.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(fma.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) (neg.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(neg.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (/.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))))
(/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 1 binary64)))
(/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(/.f64 (-.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (-.f64 lambda1 lambda2)))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 1 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (*.f64 lambda1 (*.f64 lambda1 lambda1)) (*.f64 lambda2 (*.f64 lambda2 lambda2)))) (+.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 (+.f64 lambda1 lambda2))))
(/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (*.f64 lambda1 (*.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 phi2 phi1) #s(literal -2 binary64))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (+.f64 lambda1 lambda2))
(/.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 (*.f64 lambda1 lambda1) (*.f64 lambda2 lambda2))) (*.f64 #s(literal 1 binary64) (+.f64 lambda1 lambda2)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
(/.f64 (-.f64 (pow.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))) (+.f64 (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)))) (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 lambda1 lambda2))))
(/.f64 (*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))))
(/.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (-.f64 lambda1 lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))
(pow.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)) #s(literal 1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2))
(*.f64 #s(literal 1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 lambda1 lambda2)))
(*.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2))))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))
(*.f64 (-.f64 lambda1 lambda2) (pow.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64)))
(*.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(*.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64)) (-.f64 lambda1 lambda2))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 lambda1 lambda2))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (-.f64 lambda1 lambda2)) #s(literal 1 binary64)))
(+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))
(+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -1 binary64))
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(+.f64 (*.f64 R phi2) (*.f64 R (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 phi2 R) (*.f64 (-.f64 #s(literal 0 binary64) phi1) R))
(fma.f64 R phi2 (*.f64 R (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 phi2 R (*.f64 (-.f64 #s(literal 0 binary64) phi1) R))
(/.f64 (*.f64 R (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1)))) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))))
(/.f64 (*.f64 R (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (+.f64 phi2 phi1))
(/.f64 (*.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) R) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) R) (+.f64 phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(*.f64 (-.f64 phi2 phi1) R)
(+.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))
(+.f64 (-.f64 #s(literal 0 binary64) phi1) phi2)
(+.f64 (+.f64 phi2 #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) phi1))
(-.f64 phi2 phi1)
(-.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1)))) (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1)))))
(-.f64 (/.f64 (*.f64 phi2 phi2) (+.f64 phi2 phi1)) (/.f64 (*.f64 phi1 phi1) (+.f64 phi2 phi1)))
(-.f64 (+.f64 phi2 #s(literal 0 binary64)) phi1)
(fma.f64 #s(literal -1 binary64) phi1 phi2)
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) phi2)
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) phi1) phi2)
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))) (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))
(/.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))))
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 phi2 phi1))
(/.f64 (neg.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1)))) (neg.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1)))))
(/.f64 (neg.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1)))
(/.f64 (+.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (+.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi2 (-.f64 #s(literal 0 binary64) phi1)))))
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) phi1))) (-.f64 phi2 (-.f64 #s(literal 0 binary64) phi1)))
(pow.f64 (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))) (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 phi2 phi1) (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1)))))
(*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)))
(*.f64 (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(*.f64 (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) (-.f64 phi1 phi2))
(/.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))))
(/.f64 (*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 (neg.f64 (*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) R) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))) #s(literal -1 binary64))
(*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) R))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) R))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) R)
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) R))
(*.f64 (*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (*.f64 R (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1))
(*.f64 (/.f64 (*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (/.f64 (*.f64 R (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (-.f64 (/.f64 phi2 phi1) #s(literal 1 binary64)))))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) #s(literal -1 binary64)))
(fma.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(neg.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))) (neg.f64 (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 phi1 phi1))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1)
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (/.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (-.f64 (/.f64 phi2 phi1) #s(literal 1 binary64)))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 #s(literal -1 binary64) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (/.f64 #s(literal -1 binary64) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1) (*.f64 (/.f64 #s(literal -1 binary64) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 #s(literal -1 binary64) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))))
(neg.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))))
(neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 phi1 phi1))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (*.f64 phi1 phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) phi1)
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))))) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))))) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) phi1))
(+.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) phi1)
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi1 phi1)))
(-.f64 (/.f64 #s(literal 0 binary64) phi1) (/.f64 (*.f64 phi1 phi1) phi1))
(fma.f64 #s(literal -1 binary64) phi1 #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) phi1) #s(literal 0 binary64))
(neg.f64 phi1)
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 phi1 phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) phi1)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (-.f64 #s(literal 0 binary64) phi1))
(/.f64 (+.f64 #s(literal 0 binary64) (*.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) phi1)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) phi1))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) phi1)))
(pow.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) phi1)
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) phi1))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) phi1)
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) phi1) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) phi1) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))))
(*.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
(*.f64 (/.f64 #s(literal 1 binary64) phi1) (pow.f64 (/.f64 (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) phi1) (/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) phi1))
(*.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1))
(*.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) phi1))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) phi1) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) phi1) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (/.f64 #s(literal 1 binary64) phi1))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (/.f64 #s(literal 1 binary64) phi1) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal -1/2 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (pow.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (pow.f64 (*.f64 phi1 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (pow.f64 (/.f64 phi1 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal -1 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) phi1) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) phi1) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (pow.f64 (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal 1 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 phi1 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 phi1 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 phi1 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 phi1 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(/.f64 R (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) R))
(/.f64 (neg.f64 R) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(/.f64 (/.f64 R phi1) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (/.f64 R (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(/.f64 (/.f64 R (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 R #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(/.f64 (*.f64 #s(literal -1 binary64) R) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) R) #s(literal -1 binary64))
(*.f64 R (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 #s(literal 1 binary64) (/.f64 R (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(*.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) R)
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) R))
(*.f64 (/.f64 R phi1) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
(*.f64 (/.f64 R (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))
(*.f64 (/.f64 R (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(*.f64 (/.f64 R (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (*.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))
(*.f64 (/.f64 R #s(literal 1 binary64)) (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 R (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))
(*.f64 (/.f64 R (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) #s(literal -1 binary64)))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
(/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))
(/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))) #s(literal -1 binary64))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal 1 binary64)) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))
(/.f64 (*.f64 (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 phi1 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) phi1) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) phi1)
(pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal 1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) #s(literal -1 binary64))
(*.f64 phi1 (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 phi1 (/.f64 (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))))
(*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 phi1 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
(*.f64 (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1)) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1)) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal 1 binary64)))
(*.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) phi1)
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (/.f64 phi1 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 phi1 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (/.f64 phi1 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (/.f64 phi1 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) phi1) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) phi1) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) phi1) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) phi1) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) phi1) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) #s(literal -1 binary64)) (pow.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (pow.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(*.f64 phi1 (*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)))
(*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1))
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) phi1)
(*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) R)
(+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))
(+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+.f64 (fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))
(+.f64 (fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))) (fma.f64 #s(literal -1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))))
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(-.f64 (/.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)) (/.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1 binary64)))
(-.f64 (/.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))) (/.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (/.f64 (*.f64 (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(fma.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64) (neg.f64 (-.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(fma.f64 #s(literal -1 binary64) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(fma.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (+.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -1 binary64))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))))
(/.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (*.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))
(/.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (*.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(/.f64 (-.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal 2 binary64))
(/.f64 (-.f64 (*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))) #s(literal 4 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(/.f64 (neg.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) (neg.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(/.f64 (+.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 3 binary64))) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (+.f64 (pow.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 3 binary64)) (pow.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) #s(literal 3 binary64))) (+.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (-.f64 (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(/.f64 (-.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))))) (*.f64 (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (-.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (+.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -1 binary64))
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64)) (pow.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))))) (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (cos.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))))
(*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (/.f64 #s(literal 1 binary64) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))))
(+.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) phi1))
(+.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 phi2 #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64)))
(fma.f64 phi2 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 #s(literal 1/2 binary64) phi2 (*.f64 #s(literal 1/2 binary64) phi1))
(fma.f64 #s(literal 1/2 binary64) phi1 (*.f64 phi2 #s(literal 1/2 binary64)))
(fma.f64 phi1 #s(literal 1/2 binary64) (*.f64 phi2 #s(literal 1/2 binary64)))
(neg.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) #s(literal 1 binary64)))
(/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1)) #s(literal -2 binary64))
(/.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(/.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (*.f64 #s(literal 2 binary64) (-.f64 phi1 phi2)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1))) #s(literal 2 binary64))
(/.f64 (+.f64 (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal 1/8 binary64)) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 1/8 binary64))) (+.f64 (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) phi1)))))
(/.f64 (-.f64 (*.f64 (*.f64 phi2 #s(literal 1/2 binary64)) (*.f64 phi2 #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))
(/.f64 (*.f64 (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) #s(literal 1/2 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) #s(literal 1/2 binary64)) (-.f64 phi1 phi2))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1)) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 phi1) #s(literal 2 binary64)))
(*.f64 (+.f64 phi2 phi1) #s(literal 1/2 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 phi2 phi1)) #s(literal -1/2 binary64))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 phi1 phi2)))
(+.f64 phi2 phi1)
(+.f64 phi1 phi2)
(-.f64 (/.f64 (*.f64 phi1 phi1) (-.f64 phi1 phi2)) (/.f64 (*.f64 phi2 phi2) (-.f64 phi1 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 (-.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (-.f64 phi1 phi2))
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (-.f64 phi2 phi1))
(/.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 phi1) (*.f64 phi2 phi2))) (neg.f64 (-.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 (*.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 (*.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 phi1) (*.f64 phi2 phi2))) (+.f64 phi2 phi1))
(-.f64 (/.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) #s(literal 2 binary64)) (/.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))))
(/.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) #s(literal -1 binary64))
(*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(*.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal 1/2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))))
(/.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 2 binary64))
(/.f64 (neg.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1))))) #s(literal -1 binary64))
(*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
(*.f64 (+.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 phi2 phi1)))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 phi2 phi1)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))))
(/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))
(/.f64 #s(literal 1 binary64) (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 phi1) phi2) phi2))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)) #s(literal 1 binary64)))
(/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2))))
(/.f64 (-.f64 #s(literal 0 binary64) phi2) (*.f64 (/.f64 phi1 phi2) (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (-.f64 #s(literal 0 binary64) phi2) (neg.f64 (/.f64 (*.f64 phi1 phi1) phi2)))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) (/.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/.f64 (/.f64 phi2 (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) phi2))
(/.f64 (*.f64 phi2 #s(literal 1 binary64)) (/.f64 (*.f64 phi1 phi1) phi2))
(/.f64 (*.f64 phi2 (-.f64 #s(literal 0 binary64) phi2)) (*.f64 phi1 (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (*.f64 #s(literal 1 binary64) phi2) (/.f64 (*.f64 phi1 phi1) phi2))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi2)) (*.f64 (/.f64 phi1 phi2) (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) phi2) (*.f64 (-.f64 #s(literal 0 binary64) phi1) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 phi1 phi2)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 0 binary64) phi2)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) phi1)))
(/.f64 (*.f64 phi2 (/.f64 phi2 phi1)) phi1)
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))) (/.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)))
(/.f64 (*.f64 (/.f64 phi2 phi1) phi2) phi1)
(/.f64 (*.f64 (/.f64 phi2 phi1) (-.f64 #s(literal 0 binary64) phi2)) (-.f64 #s(literal 0 binary64) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
(/.f64 (/.f64 phi2 (/.f64 phi1 phi2)) phi1)
(pow.f64 (/.f64 phi2 phi1) #s(literal 2 binary64))
(pow.f64 (/.f64 phi1 phi2) #s(literal -2 binary64))
(pow.f64 (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 phi1 phi1) phi2) phi2) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 phi1 (*.f64 (/.f64 phi2 phi1) phi2)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 phi2 (/.f64 phi2 (*.f64 phi1 phi1)))
(*.f64 phi2 (*.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi2 phi1)))
(*.f64 phi2 (/.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 phi2)))
(*.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))
(*.f64 (/.f64 phi2 phi1) (/.f64 phi2 phi1))
(*.f64 (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)))
(*.f64 (*.f64 phi2 phi2) (*.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 #s(literal 1 binary64) phi1)))
(*.f64 (*.f64 phi2 phi2) (pow.f64 (/.f64 #s(literal 1 binary64) phi1) #s(literal 2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) phi1) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) phi2) (/.f64 phi2 phi1)) #s(literal -1 binary64)))
(*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) phi2)
(*.f64 (*.f64 (/.f64 phi2 phi1) phi2) (/.f64 #s(literal 1 binary64) phi1))
(*.f64 (/.f64 (/.f64 phi2 phi1) #s(literal 1 binary64)) (/.f64 phi2 phi1))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 phi2 (*.f64 phi1 phi1))) phi2)
(*.f64 (/.f64 (/.f64 phi2 phi1) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) phi2))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) phi1) #s(literal 2 binary64)) (*.f64 phi2 phi2))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)) #s(literal 2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) phi2) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) phi2) #s(literal 2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) phi1) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) #s(literal 2 binary64)) (pow.f64 (*.f64 phi1 phi1) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) #s(literal 2 binary64)) (*.f64 phi1 phi1))
(*.f64 (pow.f64 (/.f64 (/.f64 phi1 phi2) phi2) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) phi1))
(*.f64 (pow.f64 (/.f64 (/.f64 phi1 phi2) (-.f64 #s(literal 0 binary64) phi2)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 phi1 #s(literal 1 binary64)) (*.f64 phi1 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal 1 binary64) phi1) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) phi1))
(fma.f64 phi1 #s(literal 1 binary64) (*.f64 phi1 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(fma.f64 #s(literal 1 binary64) phi1 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) phi1))
(/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) phi1) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) phi1)
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) #s(literal 0 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(+.f64 (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) #s(literal -1 binary64)))
(fma.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) phi1) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 #s(literal 0 binary64) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(fma.f64 (-.f64 #s(literal 0 binary64) phi1) #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(neg.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal 1 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))) (neg.f64 (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 phi1 phi1))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 phi1))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1)
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (*.f64 (-.f64 #s(literal 0 binary64) phi1) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (/.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1))) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2)))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) (-.f64 #s(literal 0 binary64) phi1)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (-.f64 (/.f64 phi2 phi1) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) #s(literal 2 binary64)))
(pow.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) #s(literal 2 binary64))
(*.f64 phi1 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))
(*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) phi1)
(*.f64 (*.f64 phi1 phi1) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 phi1 phi1) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) #s(literal 2 binary64)))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 phi1))
(*.f64 (*.f64 phi1 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) #s(literal 2 binary64)) (*.f64 phi1 phi1))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 R lambda1)))
(neg.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 R lambda1)))
(*.f64 R (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda1)))
(*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))
(*.f64 (*.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) lambda1))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (*.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))))
(*.f64 #s(literal -1 binary64) (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (*.f64 R lambda1)))
(*.f64 (*.f64 (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) lambda1)) R)
(*.f64 (neg.f64 (*.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))) lambda1)
(*.f64 (*.f64 (*.f64 R (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64)))) #s(literal -1 binary64)) lambda1)
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) lambda1) R) (cos.f64 (/.f64 (+.f64 phi2 phi1) #s(literal -2 binary64))))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) lambda1))
(-.f64 #s(literal 0 binary64) lambda1)
(neg.f64 lambda1)
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 lambda1 lambda1) (*.f64 #s(literal 0 binary64) lambda1))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 lambda1 lambda1)) (+.f64 #s(literal 0 binary64) lambda1))
(*.f64 lambda1 #s(literal -1 binary64))
(*.f64 #s(literal -1 binary64) lambda1)

simplify595.0ms (3.1%)

Algorithm
egg-herbie
Rules
7576×*-lowering-*.f32
7576×*-lowering-*.f64
4718×+-lowering-+.f64
4718×+-lowering-+.f32
1566×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0119615039
1420313975
0878113975
Stop Event
iter limit
node limit
Counts
756 → 756
Calls
Call 1
Inputs
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2)))))))
(* -1 (* R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(* R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))
(* -1 (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))
(* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2)))))))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2))) phi2))) phi2)))))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2)))))))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* R (- phi2 phi1))
(* -1 (* R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* R phi2)
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(* -1 (* R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 phi1)
(- phi2 phi1)
(- phi2 phi1)
(- phi2 phi1)
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
phi2
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(* -1 phi1)
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(* R phi2)
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(* -1 (* R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
phi2
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(* -1 phi1)
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 phi1)
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(/ (pow phi2 2) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(* -1 phi1)
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(* -1 phi1)
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(/ (pow phi2 2) phi1)
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(/ (pow phi2 2) phi1)
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
(* -1 phi1)
phi2
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(* -1 phi1)
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 phi1)
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(* R phi2)
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(* -1 (* R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(/ 1 phi2)
(+ (/ 1 phi2) (/ phi1 (pow phi2 2)))
(+ (* phi1 (+ (/ 1 (pow phi2 2)) (/ phi1 (pow phi2 3)))) (/ 1 phi2))
(+ (* phi1 (+ (* phi1 (+ (/ 1 (pow phi2 3)) (/ phi1 (pow phi2 4)))) (/ 1 (pow phi2 2)))) (/ 1 phi2))
(/ -1 phi1)
(/ (- (* -1 (/ phi2 phi1)) 1) phi1)
(/ (- (+ (* -1 (/ phi2 phi1)) (* -1 (/ (pow phi2 2) (pow phi1 2)))) 1) phi1)
(/ (- (+ (* -1 (/ phi2 phi1)) (+ (* -1 (/ (pow phi2 2) (pow phi1 2))) (* -1 (/ (pow phi2 3) (pow phi1 3))))) 1) phi1)
(/ -1 phi1)
(* -1 (/ (+ 1 (/ phi2 phi1)) phi1))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (pow phi2 2) phi1)) phi2) phi1))) phi1))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (pow phi2 3) phi1) (* -1 (pow phi2 2))) phi1)) phi2) phi1))) phi1))
(/ -1 phi1)
(- (* -1 (/ phi2 (pow phi1 2))) (/ 1 phi1))
(- (* phi2 (- (* -1 (/ phi2 (pow phi1 3))) (/ 1 (pow phi1 2)))) (/ 1 phi1))
(- (* phi2 (- (* phi2 (- (* -1 (/ phi2 (pow phi1 4))) (/ 1 (pow phi1 3)))) (/ 1 (pow phi1 2)))) (/ 1 phi1))
(/ 1 phi2)
(/ (+ 1 (/ phi1 phi2)) phi2)
(/ (- (+ 1 (/ (pow phi1 2) (pow phi2 2))) (* -1 (/ phi1 phi2))) phi2)
(/ (- (+ 1 (/ (pow phi1 3) (pow phi2 3))) (+ (* -1 (/ phi1 phi2)) (* -1 (/ (pow phi1 2) (pow phi2 2))))) phi2)
(/ 1 phi2)
(* -1 (/ (- (* -1 (/ phi1 phi2)) 1) phi2))
(* -1 (/ (- (* -1 (/ (- (/ (pow phi1 2) phi2) (* -1 phi1)) phi2)) 1) phi2))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow phi1 3) phi2)) (pow phi1 2)) phi2)) (* -1 phi1)) phi2)) 1) phi2))
(* -1 (pow phi1 3))
(+ (* -1 (pow phi1 3)) (* 3 (* (pow phi1 2) phi2)))
(+ (* -1 (pow phi1 3)) (* phi2 (+ (* -3 (* phi1 phi2)) (* 3 (pow phi1 2)))))
(+ (* -1 (pow phi1 3)) (* phi2 (+ (* 3 (pow phi1 2)) (* phi2 (+ phi2 (* -3 phi1))))))
(pow phi2 3)
(* (pow phi2 3) (+ 1 (* -3 (/ phi1 phi2))))
(* (pow phi2 3) (+ 1 (+ (* -3 (/ phi1 phi2)) (* 3 (/ (pow phi1 2) (pow phi2 2))))))
(* (pow phi2 3) (+ 1 (+ (* -3 (/ phi1 phi2)) (+ (* -1 (/ (pow phi1 3) (pow phi2 3))) (* 3 (/ (pow phi1 2) (pow phi2 2)))))))
(pow phi2 3)
(* -1 (* (pow phi2 3) (- (* 3 (/ phi1 phi2)) 1)))
(* -1 (* (pow phi2 3) (- (* -1 (/ (+ (* -3 phi1) (* 3 (/ (pow phi1 2) phi2))) phi2)) 1)))
(* -1 (* (pow phi2 3) (- (* -1 (/ (+ (* -3 phi1) (* -1 (/ (+ (* -3 (pow phi1 2)) (/ (pow phi1 3) phi2)) phi2))) phi2)) 1)))
(pow phi2 3)
(+ (* -1 (* phi1 (+ (* 2 (pow phi2 2)) (pow phi2 2)))) (pow phi2 3))
(+ (* phi1 (+ (* -1 (* phi1 (+ (* -2 phi2) (* -1 phi2)))) (* -1 (+ (* 2 (pow phi2 2)) (pow phi2 2))))) (pow phi2 3))
(+ (* phi1 (+ (* -1 (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* phi1 (+ (* -1 phi1) (* -1 (+ (* -2 phi2) (* -1 phi2))))))) (pow phi2 3))
(* -1 (pow phi1 3))
(* (pow phi1 3) (- (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) 1))
(* (pow phi1 3) (- (+ (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi1 2)))) 1))
(* (pow phi1 3) (- (+ (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) (+ (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi1 2))) (/ (pow phi2 3) (pow phi1 3)))) 1))
(* -1 (pow phi1 3))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (* 2 phi2)) phi1)))))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (+ (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi1)) (* 2 phi2))) phi1)))))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (+ (* -1 (/ (+ (* -1 (/ (pow phi2 3) phi1)) (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi1)) (* 2 phi2))) 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 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 phi2)))
(+ (* -1/2 (* R (* phi1 (sin (* 1/2 phi2))))) (* R (cos (* 1/2 phi2))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* -1/8 (* R (* phi1 (cos (* 1/2 phi2))))))))
(+ (* R (cos (* 1/2 phi2))) (* phi1 (+ (* -1/2 (* R (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/8 (* R (cos (* 1/2 phi2)))) (* 1/48 (* R (* phi1 (sin (* 1/2 phi2))))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 (- phi2 (* -1 phi1)))))
(* R (cos (* 1/2 phi1)))
(+ (* -1/2 (* R (* phi2 (sin (* 1/2 phi1))))) (* R (cos (* 1/2 phi1))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* -1/8 (* R (* phi2 (cos (* 1/2 phi1))))))))
(+ (* R (cos (* 1/2 phi1))) (* phi2 (+ (* -1/2 (* R (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/8 (* R (cos (* 1/2 phi1)))) (* 1/48 (* R (* phi2 (sin (* 1/2 phi1))))))))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (+ phi1 phi2))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(* R (cos (* 1/2 (- phi1 (* -1 phi2)))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(* 1/2 phi2)
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(* 1/2 phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(* 1/2 phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(* 1/2 phi1)
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(* 1/2 phi2)
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(* 1/2 phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
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)))
(* 1/2 (* phi2 (sin (* 1/2 phi1))))
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* 1/2 (* phi1 (sin (* 1/2 phi2))))
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(* -1 phi2)
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
phi1
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(* -1 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 phi1)
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
phi2
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(* -1 phi1)
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(pow phi2 2)
(+ (* -2 (* phi1 phi2)) (pow phi2 2))
(+ (* phi1 (+ phi1 (* -2 phi2))) (pow phi2 2))
(+ (* phi1 (+ phi1 (* -2 phi2))) (pow phi2 2))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (/ (pow phi2 2) (pow phi1 2)))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (/ (pow phi2 2) (pow phi1 2)))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi2 2) phi1)) (* 2 phi2)) phi1))))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi2 2) phi1)) (* 2 phi2)) phi1))))
(pow phi1 2)
(+ (* -2 (* phi1 phi2)) (pow phi1 2))
(+ (* phi2 (+ phi2 (* -2 phi1))) (pow phi1 2))
(+ (* phi2 (+ phi2 (* -2 phi1))) (pow phi1 2))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (/ (pow phi1 2) (pow phi2 2)))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (/ (pow phi1 2) (pow phi2 2)))))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi1 2) phi2)) (* 2 phi1)) phi2))))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi1 2) phi2)) (* 2 phi1)) phi2))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi2))))))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
Outputs
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 #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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R phi2) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))) #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) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))))))))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2))))))
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 phi2 phi2))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 R (*.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2))))))
(* -1 (* R phi2))
(-.f64 #s(literal 0 binary64) (*.f64 R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi2))) phi2)) (* R phi1)) phi2)))))
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 R phi1) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 R (*.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi2))) phi2)) phi2)) (-.f64 #s(literal 0 binary64) phi2))
(* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi1) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.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 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (*.f64 R phi1) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 phi1 phi1))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 R (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 R (*.f64 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (/.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 (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 R (/.f64 (+.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(*.f64 (-.f64 R (/.f64 (-.f64 (*.f64 R phi2) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 R (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 R (*.f64 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi1))) phi1)) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda1) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64)))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(*.f64 lambda1 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(*.f64 lambda1 (-.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))
(*.f64 lambda1 (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (*.f64 lambda1 lambda1)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))
(* -1 (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(*.f64 (neg.f64 (*.f64 R lambda1)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1)) (-.f64 #s(literal 0 binary64) lambda1))
(* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(-.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda2) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(*.f64 lambda2 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(*.f64 lambda2 (-.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 lambda2 lambda2)) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))))
(*.f64 lambda2 (-.f64 (+.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 lambda2 lambda2)) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))
(* -1 (* R (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))))
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* R (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))))
(*.f64 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2)) (-.f64 #s(literal 0 binary64) lambda2))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))) (*.f64 phi2 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (*.f64 (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))) #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2))))))
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi2 phi2))))))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi2)) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi1 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi2))) phi2))) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi1 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 phi1 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) phi2))) phi2)) phi2)))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.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 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))) (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 phi1 (+.f64 (*.f64 (*.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 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (*.f64 phi1 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64)) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) phi1)) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (* 1/2 (/ (* phi2 (* (pow (- lambda1 lambda2) 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) phi1))) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 phi2 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) phi1))) phi1)) phi1)))
(sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))) (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (/.f64 lambda2 lambda1) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda1 lambda1))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda1)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda1))
(sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (- (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 lambda2 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda1 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda2 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (/.f64 lambda1 lambda2) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 lambda2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))) lambda2)) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) 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 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (*.f64 (-.f64 lambda1 lambda2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (- lambda1 lambda2) (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (+ (* -1 (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 #s(literal 0 binary64) lambda1))
(* -1 (* lambda1 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda1))))
(*.f64 (-.f64 (/.f64 (*.f64 lambda2 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (-.f64 #s(literal 0 binary64) lambda1))
(* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))
(*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))))) (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 lambda1 lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* lambda2 (+ (* -1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* -1 (* lambda2 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(* -1 (* lambda2 (- (+ (* -1 (/ (* lambda1 (- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))))
(*.f64 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 lambda1 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(- (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))) (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* R (- phi2 phi1))
(*.f64 R (-.f64 phi2 phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 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))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* R phi2)
(*.f64 R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* R phi2)
(*.f64 R phi2)
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* -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 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(- phi2 phi1)
(-.f64 phi2 phi1)
(- phi2 phi1)
(-.f64 phi2 phi1)
(- phi2 phi1)
(-.f64 phi2 phi1)
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
phi2
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -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 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 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 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* -1 (/ (* R (* phi1 (- 1 (/ (pow phi2 2) (pow phi1 2))))) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 (*.f64 R phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)))) (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))))
(* R phi2)
(*.f64 R phi2)
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* -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 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 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))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* R phi2)
(*.f64 R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
phi2
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -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 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 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)
(-.f64 #s(literal 0 binary64) phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(/ (pow phi2 2) phi1)
(/.f64 (*.f64 phi2 phi2) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64)))
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64)))
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64)))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)
(/ (pow phi2 2) phi1)
(/.f64 (*.f64 phi2 phi2) phi1)
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(/ (pow phi2 2) phi1)
(/.f64 (*.f64 phi2 phi2) phi1)
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* -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)
(* -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)
(* -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)
phi2
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -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 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 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)
(-.f64 #s(literal 0 binary64) phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* R (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* R phi2)
(*.f64 R phi2)
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* -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 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(*.f64 R (-.f64 phi2 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))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* R phi2)
(*.f64 R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(/ 1 phi2)
(/.f64 #s(literal 1 binary64) phi2)
(+ (/ 1 phi2) (/ phi1 (pow phi2 2)))
(+.f64 (/.f64 phi1 (*.f64 phi2 phi2)) (/.f64 #s(literal 1 binary64) phi2))
(+ (* phi1 (+ (/ 1 (pow phi2 2)) (/ phi1 (pow phi2 3)))) (/ 1 phi2))
(+.f64 (/.f64 #s(literal 1 binary64) phi2) (*.f64 phi1 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi2 phi2)) (/.f64 phi1 (*.f64 phi2 (*.f64 phi2 phi2))))))
(+ (* phi1 (+ (* phi1 (+ (/ 1 (pow phi2 3)) (/ phi1 (pow phi2 4)))) (/ 1 (pow phi2 2)))) (/ 1 phi2))
(+.f64 (/.f64 #s(literal 1 binary64) phi2) (*.f64 phi1 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 phi1 (pow.f64 phi2 #s(literal 4 binary64))))))))
(/ -1 phi1)
(/.f64 #s(literal -1 binary64) phi1)
(/ (- (* -1 (/ phi2 phi1)) 1) phi1)
(/.f64 (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))) phi1)
(/ (- (+ (* -1 (/ phi2 phi1)) (* -1 (/ (pow phi2 2) (pow phi1 2)))) 1) phi1)
(/.f64 (+.f64 (-.f64 (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1)) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) #s(literal -1 binary64)) phi1)
(/ (- (+ (* -1 (/ phi2 phi1)) (+ (* -1 (/ (pow phi2 2) (pow phi1 2))) (* -1 (/ (pow phi2 3) (pow phi1 3))))) 1) phi1)
(/.f64 (+.f64 (-.f64 (-.f64 (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1)) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1)))) #s(literal -1 binary64)) phi1)
(/ -1 phi1)
(/.f64 #s(literal -1 binary64) phi1)
(* -1 (/ (+ 1 (/ phi2 phi1)) phi1))
(/.f64 (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1))) phi1)
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (pow phi2 2) phi1)) phi2) phi1))) phi1))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 phi2 phi2) phi1)) phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (/ (pow phi2 3) phi1) (* -1 (pow phi2 2))) phi1)) phi2) phi1))) phi1))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) phi1) (*.f64 phi2 phi2)) (-.f64 #s(literal 0 binary64) phi1)) phi2) phi1)) (-.f64 #s(literal 0 binary64) phi1))
(/ -1 phi1)
(/.f64 #s(literal -1 binary64) phi1)
(- (* -1 (/ phi2 (pow phi1 2))) (/ 1 phi1))
(+.f64 (/.f64 phi2 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (/.f64 #s(literal -1 binary64) phi1))
(- (* phi2 (- (* -1 (/ phi2 (pow phi1 3))) (/ 1 (pow phi1 2)))) (/ 1 phi1))
(+.f64 (*.f64 phi2 (+.f64 (/.f64 phi2 (*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))) (/.f64 #s(literal -1 binary64) (*.f64 phi1 phi1)))) (/.f64 #s(literal -1 binary64) phi1))
(- (* phi2 (- (* phi2 (- (* -1 (/ phi2 (pow phi1 4))) (/ 1 (pow phi1 3)))) (/ 1 (pow phi1 2)))) (/ 1 phi1))
(+.f64 (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) phi2) (pow.f64 phi1 #s(literal 4 binary64))) (/.f64 #s(literal -1 binary64) (*.f64 phi1 (*.f64 phi1 phi1))))) (/.f64 #s(literal -1 binary64) (*.f64 phi1 phi1)))) (/.f64 #s(literal -1 binary64) phi1))
(/ 1 phi2)
(/.f64 #s(literal 1 binary64) phi2)
(/ (+ 1 (/ phi1 phi2)) phi2)
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) phi2)
(/ (- (+ 1 (/ (pow phi1 2) (pow phi2 2))) (* -1 (/ phi1 phi2))) phi2)
(/.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 phi1 phi2))) phi2)
(/ (- (+ 1 (/ (pow phi1 3) (pow phi2 3))) (+ (* -1 (/ phi1 phi2)) (* -1 (/ (pow phi1 2) (pow phi2 2))))) phi2)
(/.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))) (-.f64 (/.f64 phi1 (-.f64 #s(literal 0 binary64) phi2)) (/.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))) phi2)
(/ 1 phi2)
(/.f64 #s(literal 1 binary64) phi2)
(* -1 (/ (- (* -1 (/ phi1 phi2)) 1) phi2))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)) phi2)
(* -1 (/ (- (* -1 (/ (- (/ (pow phi1 2) phi2) (* -1 phi1)) phi2)) 1) phi2))
(/.f64 (+.f64 (/.f64 (+.f64 (/.f64 (*.f64 phi1 phi1) phi2) phi1) (-.f64 #s(literal 0 binary64) phi2)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (* -1 (/ (pow phi1 3) phi2)) (pow phi1 2)) phi2)) (* -1 phi1)) phi2)) 1) phi2))
(/.f64 (+.f64 (/.f64 (+.f64 (/.f64 (-.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (-.f64 #s(literal 0 binary64) phi2)) (*.f64 phi1 phi1)) (-.f64 #s(literal 0 binary64) phi2)) phi1) (-.f64 #s(literal 0 binary64) phi2)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) phi2))
(* -1 (pow phi1 3))
(*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(+ (* -1 (pow phi1 3)) (* 3 (* (pow phi1 2) phi2)))
(-.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 (*.f64 phi1 phi1))) (*.f64 phi1 (*.f64 phi1 phi1)))
(+ (* -1 (pow phi1 3)) (* phi2 (+ (* -3 (* phi1 phi2)) (* 3 (pow phi1 2)))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 phi1 phi2)) (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)))) (*.f64 phi1 (*.f64 phi1 phi1)))
(+ (* -1 (pow phi1 3)) (* phi2 (+ (* 3 (pow phi1 2)) (* phi2 (+ phi2 (* -3 phi1))))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -3 binary64)))))) (*.f64 phi1 (*.f64 phi1 phi1)))
(pow phi2 3)
(*.f64 phi2 (*.f64 phi2 phi2))
(* (pow phi2 3) (+ 1 (* -3 (/ phi1 phi2))))
(*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2)))
(* (pow phi2 3) (+ 1 (+ (* -3 (/ phi1 phi2)) (* 3 (/ (pow phi1 2) (pow phi2 2))))))
(*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) (*.f64 phi2 phi2)))))
(* (pow phi2 3) (+ 1 (+ (* -3 (/ phi1 phi2)) (+ (* -1 (/ (pow phi1 3) (pow phi2 3))) (* 3 (/ (pow phi1 2) (pow phi2 2)))))))
(*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (-.f64 (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) (*.f64 phi2 phi2)) (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))))))
(pow phi2 3)
(*.f64 phi2 (*.f64 phi2 phi2))
(* -1 (* (pow phi2 3) (- (* 3 (/ phi1 phi2)) 1)))
(*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (neg.f64 (+.f64 (*.f64 #s(literal 3 binary64) (/.f64 phi1 phi2)) #s(literal -1 binary64))))
(* -1 (* (pow phi2 3) (- (* -1 (/ (+ (* -3 phi1) (* 3 (/ (pow phi1 2) phi2))) phi2)) 1)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 phi1 #s(literal -3 binary64)) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) phi2)) (-.f64 #s(literal 0 binary64) phi2)) #s(literal -1 binary64)) (neg.f64 (*.f64 phi2 (*.f64 phi2 phi2))))
(* -1 (* (pow phi2 3) (- (* -1 (/ (+ (* -3 phi1) (* -1 (/ (+ (* -3 (pow phi1 2)) (/ (pow phi1 3) phi2)) phi2))) phi2)) 1)))
(*.f64 (+.f64 (/.f64 (-.f64 (*.f64 phi1 #s(literal -3 binary64)) (/.f64 (+.f64 (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) phi2) (*.f64 (*.f64 phi1 phi1) #s(literal -3 binary64))) phi2)) (-.f64 #s(literal 0 binary64) phi2)) #s(literal -1 binary64)) (neg.f64 (*.f64 phi2 (*.f64 phi2 phi2))))
(pow phi2 3)
(*.f64 phi2 (*.f64 phi2 phi2))
(+ (* -1 (* phi1 (+ (* 2 (pow phi2 2)) (pow phi2 2)))) (pow phi2 3))
(+.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 #s(literal -3 binary64) (*.f64 phi2 phi2))))
(+ (* phi1 (+ (* -1 (* phi1 (+ (* -2 phi2) (* -1 phi2)))) (* -1 (+ (* 2 (pow phi2 2)) (pow phi2 2))))) (pow phi2 3))
(+.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (*.f64 phi2 #s(literal 3 binary64))) (*.f64 #s(literal -3 binary64) (*.f64 phi2 phi2)))))
(+ (* phi1 (+ (* -1 (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* phi1 (+ (* -1 phi1) (* -1 (+ (* -2 phi2) (* -1 phi2))))))) (pow phi2 3))
(+.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 (-.f64 (*.f64 phi2 #s(literal 3 binary64)) phi1)))))
(* -1 (pow phi1 3))
(*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(* (pow phi1 3) (- (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) 1))
(*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (/.f64 (*.f64 phi2 #s(literal 3 binary64)) phi1) #s(literal -1 binary64)))
(* (pow phi1 3) (- (+ (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi1 2)))) 1))
(*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (/.f64 (*.f64 phi2 #s(literal 3 binary64)) phi1) (+.f64 (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 phi1)) #s(literal -1 binary64))))
(* (pow phi1 3) (- (+ (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) (+ (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi1 2))) (/ (pow phi2 3) (pow phi1 3)))) 1))
(*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (+.f64 (/.f64 (*.f64 phi2 #s(literal 3 binary64)) phi1) (+.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 phi1)))) #s(literal -1 binary64)))
(* -1 (pow phi1 3))
(*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1)))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (* 2 phi2)) phi1)))))
(*.f64 (*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 3 binary64) phi2) phi1)))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (+ (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi1)) (* 2 phi2))) phi1)))))
(*.f64 (*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 phi2 (/.f64 (*.f64 #s(literal -3 binary64) (*.f64 phi2 phi2)) phi1)) (*.f64 #s(literal 2 binary64) phi2)) phi1)))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (+ (* -1 (/ (+ (* -1 (/ (pow phi2 3) phi1)) (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi1)) (* 2 phi2))) phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (-.f64 (*.f64 #s(literal 2 binary64) phi2) (/.f64 (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) phi1)) phi1))) 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 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))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 phi1 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 phi2 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)))))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (+ phi1 phi2)))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (-.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 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64))))
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(-.f64 #s(literal 0 binary64) (*.f64 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 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64))))
phi2
(+ phi1 phi2)
(+.f64 phi1 phi2)
(+ phi1 phi2)
(+.f64 phi1 phi2)
(+ phi1 phi2)
(+.f64 phi1 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 (/ phi2 phi1)))
(*.f64 phi1 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
phi1
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1)))))
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1)))))
(* -1 (* phi1 (- (* -1 (/ phi2 phi1)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 #s(literal -1 binary64) (/.f64 phi2 (-.f64 #s(literal 0 binary64) phi1)))))
phi1
(+ phi1 phi2)
(+.f64 phi1 phi2)
(+ phi1 phi2)
(+.f64 phi1 phi2)
(+ phi1 phi2)
(+.f64 phi1 phi2)
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 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* -1 (* phi2 (- (* -1 (/ phi1 phi2)) 1)))
(*.f64 phi2 (+.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* 1/2 (* phi2 (sin (* 1/2 phi1))))
(*.f64 (*.f64 #s(literal 1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(* phi2 (+ (* -1/48 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1)))))
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* 1/3840 (* (pow phi2 2) (sin (* 1/2 phi1))))))))
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))))
(* phi2 (+ (* 1/2 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/48 (sin (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/645120 (* (pow phi2 2) (sin (* 1/2 phi1)))) (* 1/3840 (sin (* 1/2 phi1)))))))))
(*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 phi2 phi2)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/3840 binary64))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* 1/2 (* phi1 (sin (* 1/2 phi2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* phi1 (+ (* -1/48 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2)))))
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* 1/3840 (* (pow phi1 2) (sin (* 1/2 phi2))))))))
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (*.f64 (*.f64 #s(literal 1/3840 binary64) (*.f64 phi1 phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))
(* phi1 (+ (* 1/2 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/48 (sin (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/645120 (* (pow phi1 2) (sin (* 1/2 phi2)))) (* 1/3840 (sin (* 1/2 phi2)))))))))
(*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/48 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/645120 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 phi1))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1/3840 binary64))))))))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))
(*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi2 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 phi2 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 phi2 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/384 binary64)))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 phi1))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1/384 binary64)))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64))))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64))))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64))))
phi1
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
phi2
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -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 phi1)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 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))
(pow phi2 2)
(*.f64 phi2 phi2)
(+ (* -2 (* phi1 phi2)) (pow phi2 2))
(*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64))))
(+ (* phi1 (+ phi1 (* -2 phi2))) (pow phi2 2))
(+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi1 (*.f64 phi2 #s(literal -2 binary64)))))
(+ (* phi1 (+ phi1 (* -2 phi2))) (pow phi2 2))
(+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi1 (*.f64 phi2 #s(literal -2 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 phi2 2) (pow phi1 2)))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (/ (pow phi2 2) (pow phi1 2)))))
(*.f64 (*.f64 phi1 phi1) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) 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 phi2 2) phi1)) (* 2 phi2)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) phi2) (/.f64 (*.f64 phi2 phi2) phi1)) phi1)))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi2 2) phi1)) (* 2 phi2)) phi1))))
(*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) phi2) (/.f64 (*.f64 phi2 phi2) phi1)) phi1)))
(pow phi1 2)
(*.f64 phi1 phi1)
(+ (* -2 (* phi1 phi2)) (pow phi1 2))
(+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))
(+ (* phi2 (+ phi2 (* -2 phi1))) (pow phi1 2))
(+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64)))))
(+ (* phi2 (+ phi2 (* -2 phi1))) (pow phi1 2))
(+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 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 phi1 2) (pow phi2 2)))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (/ (pow phi1 2) (pow phi2 2)))))
(*.f64 (*.f64 phi2 phi2) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2)) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) 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 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 phi1 phi1) phi2)) phi2)))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (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 phi1 phi1) phi2)) phi2)))
(* -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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 lambda1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))))
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi2))))))))))
(-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) R) (*.f64 (*.f64 lambda1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -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 (* 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 (* 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 (* 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 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 lambda1 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) R) (*.f64 (*.f64 lambda1 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal 1/8 binary64) (*.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) phi1))))
(* -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 (* 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 (* 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 (* 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 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))))
(* -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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)

eval311.0ms (1.6%)

Compiler

Compiled 58563 to 4799 computations (91.8% saved)

prune352.0ms (1.9%)

Pruning

63 alts after pruning (61 fresh and 2 done)

PrunedKeptTotal
New1599421641
Fresh101929
Picked415
Done011
Total1613631676
Accuracy
100.0%
Counts
1676 → 63
Alt Table
Click to see full alt table
StatusAccuracyProgram
11.7%
(/.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 R lambda1)))
16.7%
(/.f64 (*.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) R) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))))
37.2%
(/.f64 (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) R) (+.f64 phi2 phi1))
57.4%
(/.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
32.4%
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
38.2%
(*.f64 (/.f64 R (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
18.3%
(*.f64 (/.f64 R (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
24.1%
(*.f64 (/.f64 R phi1) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
57.3%
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) R))
57.7%
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (*.f64 R (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
20.1%
(*.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (neg.f64 lambda1))
19.9%
(*.f64 (*.f64 R (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 lambda1))
19.1%
(*.f64 (*.f64 R (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 lambda1))
10.8%
(*.f64 (*.f64 R (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))))) (neg.f64 lambda1))
22.0%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
23.9%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
10.1%
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
11.1%
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
10.7%
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
58.5%
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
56.4%
(*.f64 phi1 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 phi2 phi1))))
99.9%
(*.f64 R (hypot.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
94.0%
(*.f64 R (hypot.f64 (/.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
92.9%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
82.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)) (-.f64 phi1 phi2)))
92.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
94.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
15.0%
(*.f64 R (/.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)))))))))
14.8%
(*.f64 R (/.f64 (/.f64 (*.f64 phi2 phi2) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
37.8%
(*.f64 R (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 phi2 phi1)))
32.6%
(*.f64 R (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
37.1%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1))
42.7%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 phi1 phi2)) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
42.7%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 phi1)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
36.7%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 #s(literal 1 binary64) phi1))))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
36.0%
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
39.1%
(*.f64 R (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
20.8%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
18.2%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))) (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))))))
16.5%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
12.3%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
19.2%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
32.6%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
10.9%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
16.6%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))))))
14.0%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) phi2) (/.f64 (*.f64 phi2 phi2) phi1)) phi1)))))))
7.5%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi2 (*.f64 phi2 phi2)))))
11.6%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))))))
24.2%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
36.5%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) phi2)))
32.3%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) phi1)))
17.4%
(*.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))))
63.5%
(*.f64 R (-.f64 phi2 phi1))
57.5%
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi2 (+.f64 (/.f64 #s(literal 1 binary64) phi2) (/.f64 #s(literal -1 binary64) phi1))))))
17.0%
(*.f64 R (*.f64 (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
11.1%
(*.f64 R (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
37.8%
(*.f64 R (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
18.1%
(*.f64 R (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))))
10.7%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
20.3%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
9.0%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
57.8%
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
36.5%
(*.f64 R phi2)
Compiler

Compiled 3498 to 1941 computations (44.5% saved)

simplify257.0ms (1.4%)

Algorithm
egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
cost-diff-64
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
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-diff512
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
cost-diff640
(/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))
cost-diff768
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
cost-diff768
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
cost-diff0
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
cost-diff256
(*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64)))
cost-diff256
(/.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
cost-diff256
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
cost-diff0
(*.f64 R phi1)
cost-diff0
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
cost-diff6400
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
cost-diff6528
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
cost-diff6528
(hypot.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2))
cost-diff6528
(*.f64 R (hypot.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
Rules
3496×*-lowering-*.f32
3496×*-lowering-*.f64
1764×/-lowering-/.f32
1764×/-lowering-/.f64
1548×fma-define
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
059480
1156432
2436422
32042369
47725369
08245369
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* R (sqrt (+ (* (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2))) (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
R
(sqrt (+ (* (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2))) (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
(/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))
(+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1))))
(- 0 (sin (* phi2 1/2)))
0
(sin (* phi2 1/2))
(* phi2 1/2)
phi2
1/2
(sin (* 1/2 phi1))
(* 1/2 phi1)
phi1
(* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))
(cos (* phi2 1/2))
(cos (* 1/2 phi1))
(/ 1 (- lambda1 lambda2))
1
(- lambda1 lambda2)
lambda1
lambda2
(- phi1 phi2)
(- 0 (* R phi1))
0
(* R phi1)
R
phi1
(* R (/ (* phi1 (+ (/ (* phi2 phi2) (* phi1 phi1)) -1)) (+ 1 (/ phi2 phi1))))
R
(/ (* phi1 (+ (/ (* phi2 phi2) (* phi1 phi1)) -1)) (+ 1 (/ phi2 phi1)))
(* phi1 (+ (/ (* phi2 phi2) (* phi1 phi1)) -1))
phi1
(+ (/ (* phi2 phi2) (* phi1 phi1)) -1)
(/ (* phi2 phi2) (* phi1 phi1))
(* phi2 phi2)
phi2
(* phi1 phi1)
-1
(+ 1 (/ phi2 phi1))
1
(/ phi2 phi1)
(* R (/ 1 (/ (+ (* phi1 phi1) (* -2 (* phi1 phi2))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))))
R
(/ 1 (/ (+ (* phi1 phi1) (* -2 (* phi1 phi2))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))))
1
(/ (+ (* phi1 phi1) (* -2 (* phi1 phi2))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))
(+ (* phi1 phi1) (* -2 (* phi1 phi2)))
(* phi1 phi1)
phi1
(* -2 (* phi1 phi2))
-2
(* phi1 phi2)
phi2
(* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))
(* (- 1 (/ phi2 phi1)) (- 0 phi1))
(- 1 (/ phi2 phi1))
(/ phi2 phi1)
(- 0 phi1)
0
(* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))
(* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))
(* phi1 (- 1 (/ phi2 phi1)))
(* R (* (cos (* 1/2 (+ phi1 phi2))) (neg lambda1)))
R
(* (cos (* 1/2 (+ phi1 phi2))) (neg lambda1))
(cos (* 1/2 (+ phi1 phi2)))
(* 1/2 (+ phi1 phi2))
1/2
(+ phi1 phi2)
phi1
phi2
(neg lambda1)
lambda1
Outputs
(* R (sqrt (+ (* (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2))) (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
(*.f64 R (hypot.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
R
(sqrt (+ (* (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2))) (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
(hypot.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))
(/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (-.f64 lambda1 lambda2))
(+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1))))
(-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(- 0 (sin (* phi2 1/2)))
(-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))
0
#s(literal 0 binary64)
(sin (* phi2 1/2))
(sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(* phi2 1/2)
(*.f64 phi2 #s(literal 1/2 binary64))
phi2
1/2
#s(literal 1/2 binary64)
(sin (* 1/2 phi1))
(sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
phi1
(* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))
(*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(cos (* phi2 1/2))
(cos.f64 (*.f64 phi2 #s(literal 1/2 binary64)))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(/ 1 (- lambda1 lambda2))
(/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))
1
#s(literal 1 binary64)
(- lambda1 lambda2)
(-.f64 lambda1 lambda2)
lambda1
lambda2
(- phi1 phi2)
(-.f64 phi1 phi2)
(- 0 (* R phi1))
(*.f64 R (-.f64 #s(literal 0 binary64) phi1))
0
#s(literal 0 binary64)
(* R phi1)
(*.f64 R phi1)
R
phi1
(* R (/ (* phi1 (+ (/ (* phi2 phi2) (* phi1 phi1)) -1)) (+ 1 (/ phi2 phi1))))
(/.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
R
(/ (* phi1 (+ (/ (* phi2 phi2) (* phi1 phi1)) -1)) (+ 1 (/ phi2 phi1)))
(/.f64 (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ (/ (* phi2 phi2) (* phi1 phi1)) -1))
(-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)
phi1
(+ (/ (* phi2 phi2) (* phi1 phi1)) -1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(/ (* phi2 phi2) (* phi1 phi1))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(* phi2 phi2)
(*.f64 phi2 phi2)
phi2
(* phi1 phi1)
(*.f64 phi1 phi1)
-1
#s(literal -1 binary64)
(+ 1 (/ phi2 phi1))
(+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))
1
#s(literal 1 binary64)
(/ phi2 phi1)
(/.f64 phi2 phi1)
(* R (/ 1 (/ (+ (* phi1 phi1) (* -2 (* phi1 phi2))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))))
(/.f64 R (/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (*.f64 phi2 #s(literal -2 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 phi2 #s(literal 1 binary64)) phi1) (-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64))))))
R
(/ 1 (/ (+ (* phi1 phi1) (* -2 (* phi1 phi2))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))))
(/.f64 (-.f64 (*.f64 phi2 #s(literal 1 binary64)) phi1) (/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (*.f64 phi2 #s(literal -2 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64)))))
1
#s(literal 1 binary64)
(/ (+ (* phi1 phi1) (* -2 (* phi1 phi2))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi1 (*.f64 phi2 #s(literal -2 binary64))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 (*.f64 phi2 #s(literal 1 binary64)) phi1) (-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64)))))
(+ (* phi1 phi1) (* -2 (* phi1 phi2)))
(*.f64 phi1 (+.f64 phi1 (*.f64 phi2 #s(literal -2 binary64))))
(* phi1 phi1)
(*.f64 phi1 phi1)
phi1
(* -2 (* phi1 phi2))
(*.f64 #s(literal -2 binary64) (*.f64 phi2 phi1))
-2
#s(literal -2 binary64)
(* phi1 phi2)
(*.f64 phi2 phi1)
phi2
(* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))))
(*.f64 (-.f64 (*.f64 phi2 #s(literal 1 binary64)) phi1) (*.f64 (-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64))) (-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64)))))
(* (- 1 (/ phi2 phi1)) (- 0 phi1))
(-.f64 (*.f64 phi2 #s(literal 1 binary64)) phi1)
(- 1 (/ phi2 phi1))
(-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))
(/ phi2 phi1)
(/.f64 phi2 phi1)
(- 0 phi1)
(-.f64 #s(literal 0 binary64) phi1)
0
#s(literal 0 binary64)
(* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))
(*.f64 (-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64))) (-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64))))
(* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64))))
(* phi1 (- 1 (/ phi2 phi1)))
(-.f64 phi1 (*.f64 phi2 #s(literal 1 binary64)))
(* R (* (cos (* 1/2 (+ phi1 phi2))) (neg lambda1)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (*.f64 R (-.f64 #s(literal 0 binary64) lambda1)))
R
(* (cos (* 1/2 (+ phi1 phi2))) (neg lambda1))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) lambda1))
(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
(neg lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
lambda1

localize766.0ms (4.1%)

Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(neg.f64 lambda1)
accuracy99.7%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
accuracy99.7%
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))
accuracy79.7%
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2)))
accuracy93.7%
(*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
accuracy84.9%
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))
accuracy84.9%
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
accuracy56.8%
(/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))
accuracy100.0%
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
accuracy93.0%
(*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64)))
accuracy79.9%
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
accuracy74.2%
(/.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
accuracy100.0%
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
accuracy100.0%
(*.f64 R phi1)
accuracy99.9%
(*.f64 R (hypot.f64 (/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
accuracy99.9%
(*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
accuracy99.9%
(fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
accuracy99.6%
(/.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2)))
Results
575.0ms189×1valid
56.0ms66×0valid
3.0ms3valid
Compiler

Compiled 521 to 56 computations (89.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 368.0ms
ival-mult: 117.0ms (31.8% of total)
backward-pass: 87.0ms (23.7% of total)
ival-div: 52.0ms (14.1% of total)
ival-cos: 28.0ms (7.6% of total)
ival-sin: 26.0ms (7.1% of total)
compiled-spec: 22.0ms (6% of total)
ival-sub: 14.0ms (3.8% of total)
ival-add: 14.0ms (3.8% of total)
ival-sqrt: 4.0ms (1.1% of total)
const: 2.0ms (0.5% of total)
ival-neg: 2.0ms (0.5% of total)

series168.0ms (0.9%)

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

183 calls:

TimeVariablePointExpression
23.0ms
lambda1
@0
(* (cos (* 1/2 (+ phi1 phi2))) (neg lambda1))
23.0ms
phi1
@inf
(sqrt (+ (* (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2))) (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2))))
20.0ms
R
@0
(* R (/ 1 (/ (+ (* phi1 phi1) (* -2 (* phi1 phi2))) (* (* (- 1 (/ phi2 phi1)) (- 0 phi1)) (* phi1 (* (- 1 (/ phi2 phi1)) (* phi1 (- 1 (/ phi2 phi1)))))))))
6.0ms
lambda1
@0
(* R (sqrt (+ (* (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2))) (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))
3.0ms
R
@inf
(* R (sqrt (+ (* (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2))) (/ (+ (* (- 0 (sin (* phi2 1/2))) (sin (* 1/2 phi1))) (* (cos (* phi2 1/2)) (cos (* 1/2 phi1)))) (/ 1 (- lambda1 lambda2)))) (* (- phi1 phi2) (- phi1 phi2)))))

rewrite395.0ms (2.1%)

Algorithm
batch-egg-rewrite
Rules
3290×*-lowering-*.f32
3290×*-lowering-*.f64
2152×pow-lowering-pow.f64
2152×pow-lowering-pow.f32
2102×/-lowering-/.f32
Iterations

Useful iterations: 2 (0.0ms)

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

simplify556.0ms (2.9%)

Algorithm
egg-herbie
Rules
6410×*-lowering-*.f32
6410×*-lowering-*.f64
3034×+-lowering-+.f64
3034×+-lowering-+.f32
1644×*-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0157517142
1577315245
0803915245
Stop Event
iter limit
node limit
Counts
732 → 732
Calls
Call 1
Inputs
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(* 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 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2))))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi2)) (* R phi1)) phi2)))))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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/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 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi1)) (* R phi2)) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) phi1))) phi1)) (* R phi2)) phi1)))))
(* R (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))))
(* -1 (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* R (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))))
(* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))))
(* -1 (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(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 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi2))) phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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/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 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) phi1))) phi1))) phi1)))))
(sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda1)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(* -1 (* lambda1 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1))))
(* -1 (* lambda1 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* lambda2 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)))
(* lambda2 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (* -1/8 (* phi1 (cos (* 1/2 phi2)))))))
(+ (cos (* 1/2 phi2)) (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* -1 (* R phi1))
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(* R phi1)
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(* R phi2)
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(* -1 (* R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(* -1 (* R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(+ (* -1 (* R phi1)) (* R phi2))
(* R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(* R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
phi2
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(* -1 phi1)
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 phi1)
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(/ (pow phi2 2) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(* -1 phi1)
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(* -1 phi1)
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(/ (pow phi2 2) phi1)
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(/ (pow phi2 2) phi1)
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
-1
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(/ (pow phi2 2) (pow phi1 2))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(/ (pow phi2 2) (pow phi1 2))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(/ (pow phi2 2) (pow phi1 2))
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) (pow phi1 2))
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) (pow phi1 2))
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) (pow phi1 2))
-1
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
-1
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(* -1/2 (/ (* R (pow phi2 2)) phi1))
(/ (+ (* -1 (* phi1 (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))))) (* -1/2 (* R (pow phi2 2)))) phi1)
(/ (+ (* -1/2 (* R (pow phi2 2))) (* phi1 (+ (* -1 (* phi1 (- (* -1/2 (/ (* R (+ (* -2 phi2) (* -1 phi2))) phi2)) (* -1/2 (/ (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))) phi2))))) (* -1 (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))))))) phi1)
(/ (+ (* -1/2 (* R (pow phi2 2))) (* phi1 (+ (* -1 (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2)))) (* phi1 (+ (* -1 (* phi1 (- (* -1/2 (/ R phi2)) (* -1/2 (/ (- (* -1/2 (/ (* R (+ (* -2 phi2) (* -1 phi2))) phi2)) (* -1/2 (/ (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))) phi2))) phi2))))) (* -1 (- (* -1/2 (/ (* R (+ (* -2 phi2) (* -1 phi2))) phi2)) (* -1/2 (/ (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))) phi2))))))))) phi1)
(* -1 (* R phi1))
(* phi1 (+ (* -1 R) (* -1 (/ (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2))) phi1))))
(* phi1 (+ (* -1 R) (+ (* -1 (/ (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2))) phi1)) (* -1 (/ (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* -2 (* phi2 (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2)))))) (pow phi1 2))))))
(* phi1 (+ (* -1 R) (+ (* -1 (/ (- (* -1 (* R (pow phi2 3))) (* -2 (* phi2 (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* -2 (* phi2 (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2))))))))) (pow phi1 3))) (+ (* -1 (/ (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2))) phi1)) (* -1 (/ (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* -2 (* phi2 (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2)))))) (pow phi1 2)))))))
(* -1 (* R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (- (* R (+ phi2 (* 2 phi2))) (* 2 (* R phi2))) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (- (+ (* -1 (/ (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* 2 (* phi2 (- (* R (+ phi2 (* 2 phi2))) (* 2 (* R phi2)))))) phi1)) (* R (+ phi2 (* 2 phi2)))) (* 2 (* R phi2))) phi1)))))
(* -1 (* phi1 (+ R (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* R (pow phi2 3)) (* 2 (* phi2 (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* 2 (* phi2 (- (* R (+ phi2 (* 2 phi2))) (* 2 (* R phi2))))))))) phi1)) (* R (+ (* 2 (pow phi2 2)) (pow phi2 2)))) (* 2 (* phi2 (- (* R (+ phi2 (* 2 phi2))) (* 2 (* R phi2)))))) phi1)) (* R (+ phi2 (* 2 phi2)))) (* 2 (* R phi2))) phi1)))))
(* -1 (* R phi1))
(+ (* -1 (* R phi1)) (* -1 (* phi2 (- (* -3 R) (* -2 R)))))
(+ (* -1 (* R phi1)) (* phi2 (+ (* -1 (* phi2 (- (* 3 (/ R phi1)) (* -2 (/ (- (* -3 R) (* -2 R)) phi1))))) (* -1 (- (* -3 R) (* -2 R))))))
(+ (* -1 (* R phi1)) (* phi2 (+ (* -1 (- (* -3 R) (* -2 R))) (* phi2 (+ (* -1 (* phi2 (- (* -1 (/ R (pow phi1 2))) (* -2 (/ (- (* 3 (/ R phi1)) (* -2 (/ (- (* -3 R) (* -2 R)) phi1))) phi1))))) (* -1 (- (* 3 (/ R phi1)) (* -2 (/ (- (* -3 R) (* -2 R)) phi1)))))))))
(* -1/2 (/ (* R (pow phi2 2)) phi1))
(* (pow phi2 2) (+ (* -1 (/ (- (* -3/2 R) (* -1/4 R)) phi2)) (* -1/2 (/ R phi1))))
(* (pow phi2 2) (+ (* -1 (/ (- (* -3/2 R) (* -1/4 R)) phi2)) (+ (* -1 (/ (- (* 3/2 (* R phi1)) (* -1/2 (* phi1 (- (* -3/2 R) (* -1/4 R))))) (pow phi2 2))) (* -1/2 (/ R phi1)))))
(* (pow phi2 2) (+ (* -1 (/ (- (* -3/2 R) (* -1/4 R)) phi2)) (+ (* -1 (/ (- (* -1/2 (* R (pow phi1 2))) (* -1/2 (* phi1 (- (* 3/2 (* R phi1)) (* -1/2 (* phi1 (- (* -3/2 R) (* -1/4 R)))))))) (pow phi2 3))) (+ (* -1 (/ (- (* 3/2 (* R phi1)) (* -1/2 (* phi1 (- (* -3/2 R) (* -1/4 R))))) (pow phi2 2))) (* -1/2 (/ R phi1))))))
(* -1/2 (/ (* R (pow phi2 2)) phi1))
(* (pow phi2 2) (- (+ (* -1/2 (/ R phi1)) (* 3/2 (/ R phi2))) (* 1/4 (/ R phi2))))
(* (pow phi2 2) (+ (* -1 (/ (- (+ (* -1 (- (* 3/2 R) (* 1/4 R))) (* 3/2 (/ (* R phi1) phi2))) (* 1/2 (/ (* phi1 (- (* 3/2 R) (* 1/4 R))) phi2))) phi2)) (* -1/2 (/ R phi1))))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (- (* 3/2 R) (* 1/4 R))) (* -1 (/ (- (+ (* -1 (- (* 3/2 (* R phi1)) (* 1/2 (* phi1 (- (* 3/2 R) (* 1/4 R)))))) (* 1/2 (/ (* R (pow phi1 2)) phi2))) (* 1/2 (/ (* phi1 (- (* 3/2 (* R phi1)) (* 1/2 (* phi1 (- (* 3/2 R) (* 1/4 R)))))) phi2))) phi2))) phi2)) (* -1/2 (/ R phi1))))
(* -1/2 (/ (pow phi2 2) phi1))
(/ (+ (* -1 (* phi1 (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)))) (* -1/2 (pow phi2 2))) phi1)
(/ (+ (* -1/2 (pow phi2 2)) (* phi1 (+ (* -1 (* phi1 (- (* -1/2 (/ (+ (* -2 phi2) (* -1 phi2)) phi2)) (* -1/2 (/ (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)) phi2))))) (* -1 (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)))))) phi1)
(/ (+ (* -1/2 (pow phi2 2)) (* phi1 (+ (* -1 (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2))) (* phi1 (+ (* -1 (- (* -1/2 (/ (+ (* -2 phi2) (* -1 phi2)) phi2)) (* -1/2 (/ (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)) phi2)))) (* phi1 (+ (* -1/2 (/ (- (* -1/2 (/ (+ (* -2 phi2) (* -1 phi2)) phi2)) (* -1/2 (/ (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)) phi2))) phi2)) (* 1/2 (/ 1 phi2))))))))) phi1)
(* -1 phi1)
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (+ (* -1 (/ (pow phi2 2) (pow phi1 2))) (/ phi2 phi1)) 1))
(* phi1 (- (+ (* -1 (/ (- (* -1 (pow phi2 3)) (* -2 (pow phi2 3))) (pow phi1 3))) (+ (* -1 (/ (pow phi2 2) (pow phi1 2))) (/ phi2 phi1))) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (pow phi2 2) phi1))) phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* -1 (/ (- (pow phi2 3) (* 2 (pow phi2 3))) phi1)) (pow phi2 2)) phi1))) phi1)))))
(* -1 phi1)
(+ phi2 (* -1 phi1))
(+ (* -1 phi1) (* phi2 (+ 1 (* -1 (/ phi2 phi1)))))
(+ (* -1 phi1) (* phi2 (+ 1 (* phi2 (- (* -1 (/ phi2 (pow phi1 2))) (/ 1 phi1))))))
(* -1/2 (/ (pow phi2 2) phi1))
(* (pow phi2 2) (- (* 5/4 (/ 1 phi2)) (* 1/2 (/ 1 phi1))))
(* (pow phi2 2) (- (+ (* -1 (/ (- (* 3/2 phi1) (* 5/8 phi1)) (pow phi2 2))) (* 5/4 (/ 1 phi2))) (* 1/2 (/ 1 phi1))))
(* (pow phi2 2) (- (+ (* -1 (/ (- (* -1/2 (pow phi1 2)) (* -1/2 (* phi1 (- (* 3/2 phi1) (* 5/8 phi1))))) (pow phi2 3))) (+ (* -1 (/ (- (* 3/2 phi1) (* 5/8 phi1)) (pow phi2 2))) (* 5/4 (/ 1 phi2)))) (* 1/2 (/ 1 phi1))))
(* -1/2 (/ (pow phi2 2) phi1))
(* (pow phi2 2) (- (* 5/4 (/ 1 phi2)) (* 1/2 (/ 1 phi1))))
(* (pow phi2 2) (- (* -1 (/ (- (* 3/2 (/ phi1 phi2)) (+ 5/4 (* 5/8 (/ phi1 phi2)))) phi2)) (* 1/2 (/ 1 phi1))))
(* (pow phi2 2) (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (- (* 3/2 phi1) (* 5/8 phi1))) (* 1/2 (/ (pow phi1 2) phi2))) (* 1/2 (/ (* phi1 (- (* 3/2 phi1) (* 5/8 phi1))) phi2))) phi2)) 5/4) phi2)) (* 1/2 (/ 1 phi1))))
(* -2 (/ phi1 (pow phi2 2)))
(* phi1 (- (* phi1 (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3)))) (* 2 (/ 1 (pow phi2 2)))))
(* phi1 (- (* phi1 (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (+ (* phi1 (+ (* -2 (/ (+ (* -2 phi2) (* -1 phi2)) (pow phi2 5))) (/ (* (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3))) (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi2 3)))) (/ 1 (pow phi2 3))))) (* 2 (/ 1 (pow phi2 2)))))
(* phi1 (- (* phi1 (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (+ (* phi1 (+ (* -2 (/ (+ (* -2 phi2) (* -1 phi2)) (pow phi2 5))) (+ (* -1 (* phi1 (- (* 2 (/ 1 (pow phi2 5))) (+ (/ (* (+ (* -2 phi2) (* -1 phi2)) (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3)))) (pow phi2 3)) (/ (* (+ (* -2 (/ (+ (* -2 phi2) (* -1 phi2)) (pow phi2 5))) (/ (* (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3))) (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi2 3))) (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi2 3)))))) (/ (* (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3))) (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi2 3))))) (/ 1 (pow phi2 3))))) (* 2 (/ 1 (pow phi2 2)))))
(/ -1 phi1)
(/ (- (* -1 (/ phi2 phi1)) 1) phi1)
(/ (- (+ (* -1 (/ phi2 phi1)) (+ (* 2 (/ (pow phi2 2) (pow phi1 2))) (+ (/ (* phi2 (+ (* -2 phi2) (* -1 phi2))) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))) 1) phi1)
(/ (- (+ (* -1 (/ phi2 phi1)) (+ (* -1 (/ (* (+ (* -2 phi2) (* -1 phi2)) (+ (* 2 (pow phi2 2)) (+ (* phi2 (+ (* -2 phi2) (* -1 phi2))) (pow phi2 2)))) (pow phi1 3))) (+ (* -1 (/ (pow phi2 3) (pow phi1 3))) (+ (* 2 (/ (pow phi2 2) (pow phi1 2))) (+ (/ (* phi2 (+ (* -2 phi2) (* -1 phi2))) (pow phi1 2)) (+ (/ (* phi2 (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi1 3)) (/ (pow phi2 2) (pow phi1 2)))))))) 1) phi1)
(/ -1 phi1)
(* -1 (/ (+ 1 (/ phi2 phi1)) phi1))
(* -1 (/ (+ 1 (* -1 (/ (- (+ (* -1 (/ (* phi2 (+ phi2 (* 2 phi2))) phi1)) (+ (* 2 (/ (pow phi2 2) phi1)) (/ (pow phi2 2) phi1))) phi2) phi1))) phi1))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* phi2 (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi1)) (+ (* -1 (/ (* (+ phi2 (* 2 phi2)) (+ (* -1 (* phi2 (+ phi2 (* 2 phi2)))) (+ (* 2 (pow phi2 2)) (pow phi2 2)))) phi1)) (/ (pow phi2 3) phi1))) (+ (* -1 (* phi2 (+ phi2 (* 2 phi2)))) (+ (* 2 (pow phi2 2)) (pow phi2 2)))) phi1)) phi2) phi1))) phi1))
(/ -1 phi1)
(- (* -1 (/ phi2 (pow phi1 2))) (/ 1 phi1))
(- (* phi2 (- (* 2 (/ (pow phi2 2) (pow phi1 4))) (/ 1 (pow phi1 2)))) (/ 1 phi1))
(- (* phi2 (- (* (pow phi2 2) (+ (* 5 (/ phi2 (pow phi1 5))) (* 2 (/ 1 (pow phi1 4))))) (/ 1 (pow phi1 2)))) (/ 1 phi1))
(* -2 (/ phi1 (pow phi2 2)))
(/ (+ (* -2 phi1) (* -1 (/ (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2))) phi2))) (pow phi2 2))
(/ (+ (* -3 (/ (* phi1 (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2)))) (pow phi2 2))) (+ (* -2 phi1) (+ (* -1 (/ (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2))) phi2)) (* 6 (/ (pow phi1 3) (pow phi2 2)))))) (pow phi2 2))
(/ (+ (* -3 (/ (* phi1 (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2)))) (pow phi2 2))) (+ (* -2 phi1) (+ (* -2 (/ (pow phi1 4) (pow phi2 3))) (+ (* -1 (/ (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2))) phi2)) (+ (* 3 (/ (* phi1 (+ (* -3 (* phi1 (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2))))) (* 6 (pow phi1 3)))) (pow phi2 3))) (+ (* 3 (/ (* (pow phi1 2) (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2)))) (pow phi2 3))) (* 6 (/ (pow phi1 3) (pow phi2 2))))))))) (pow phi2 2))
(* -2 (/ phi1 (pow phi2 2)))
(/ (- (+ (* -2 phi1) (/ (pow phi1 2) phi2)) (* 6 (/ (pow phi1 2) phi2))) (pow phi2 2))
(/ (+ (* -2 phi1) (* -1 (/ (+ (* -1 (- (pow phi1 2) (* 6 (pow phi1 2)))) (* -1 (/ (+ (* 3 (* phi1 (- (pow phi1 2) (* 6 (pow phi1 2))))) (* 6 (pow phi1 3))) phi2))) phi2))) (pow phi2 2))
(/ (+ (* -2 phi1) (* -1 (/ (+ (* -1 (- (pow phi1 2) (* 6 (pow phi1 2)))) (* -1 (/ (+ (* -1 (/ (+ (* -3 (* phi1 (+ (* 3 (* phi1 (- (pow phi1 2) (* 6 (pow phi1 2))))) (* 6 (pow phi1 3))))) (+ (* 2 (pow phi1 4)) (* 3 (* (pow phi1 2) (- (pow phi1 2) (* 6 (pow phi1 2))))))) phi2)) (+ (* 3 (* phi1 (- (pow phi1 2) (* 6 (pow phi1 2))))) (* 6 (pow phi1 3)))) phi2))) phi2))) (pow phi2 2))
(* -1 (pow phi1 3))
(+ (* -1 (pow phi1 3)) (* 3 (* (pow phi1 2) phi2)))
(+ (* -1 (pow phi1 3)) (* phi2 (+ (* -3 (* phi1 phi2)) (* 3 (pow phi1 2)))))
(+ (* -1 (pow phi1 3)) (* phi2 (+ (* 3 (pow phi1 2)) (* phi2 (+ phi2 (* -3 phi1))))))
(pow phi2 3)
(* (pow phi2 3) (+ 1 (* -3 (/ phi1 phi2))))
(* (pow phi2 3) (+ 1 (+ (* -3 (/ phi1 phi2)) (* 3 (/ (pow phi1 2) (pow phi2 2))))))
(* (pow phi2 3) (+ 1 (+ (* -3 (/ phi1 phi2)) (+ (* -1 (/ (pow phi1 3) (pow phi2 3))) (* 3 (/ (pow phi1 2) (pow phi2 2)))))))
(pow phi2 3)
(* -1 (* (pow phi2 3) (- (* 3 (/ phi1 phi2)) 1)))
(* -1 (* (pow phi2 3) (- (* -1 (/ (+ (* -3 phi1) (* 3 (/ (pow phi1 2) phi2))) phi2)) 1)))
(* -1 (* (pow phi2 3) (- (* -1 (/ (+ (* -3 phi1) (* -1 (/ (+ (* -3 (pow phi1 2)) (/ (pow phi1 3) phi2)) phi2))) phi2)) 1)))
(pow phi2 3)
(+ (* -1 (* phi1 (+ (* 2 (pow phi2 2)) (pow phi2 2)))) (pow phi2 3))
(+ (* phi1 (+ (* -1 (* phi1 (+ (* -2 phi2) (* -1 phi2)))) (* -1 (+ (* 2 (pow phi2 2)) (pow phi2 2))))) (pow phi2 3))
(+ (* phi1 (+ (* -1 (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* phi1 (+ (* -1 phi1) (* -1 (+ (* -2 phi2) (* -1 phi2))))))) (pow phi2 3))
(* -1 (pow phi1 3))
(* (pow phi1 3) (- (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) 1))
(* (pow phi1 3) (- (+ (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi1 2)))) 1))
(* (pow phi1 3) (- (+ (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) (+ (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi1 2))) (/ (pow phi2 3) (pow phi1 3)))) 1))
(* -1 (pow phi1 3))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (* 2 phi2)) phi1)))))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (+ (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi1)) (* 2 phi2))) phi1)))))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (+ (* -1 (/ (+ (* -1 (/ (pow phi2 3) phi1)) (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi1)) (* 2 phi2))) phi1)))))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* -1/8 (* phi1 (cos (* 1/2 phi2)))) (* 1/2 (sin (* 1/2 phi2))))))
(+ (cos (* 1/2 phi2)) (* phi1 (- (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))) (* 1/2 (sin (* 1/2 phi2))))))
(cos (* 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)))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi2)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi2))))))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 phi1)))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (+ phi1 phi2))))))
(cos (* 1/2 phi1))
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(cos (* 1/2 phi2))
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(/ (pow phi2 2) (pow phi1 2))
(* -1 phi2)
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
phi1
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(+ phi1 (* -1 phi2))
(* -1 phi2)
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* phi2 (- (/ phi1 phi2) 1))
(* -1 phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(* -1 phi1)
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
phi2
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(+ phi2 (* -1 phi1))
(* -1 phi1)
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* phi1 (- (/ phi2 phi1) 1))
(* -1 phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(pow phi2 2)
(+ (* -2 (* phi1 phi2)) (pow phi2 2))
(+ (* phi1 (+ phi1 (* -2 phi2))) (pow phi2 2))
(+ (* phi1 (+ phi1 (* -2 phi2))) (pow phi2 2))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (/ (pow phi2 2) (pow phi1 2)))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (/ (pow phi2 2) (pow phi1 2)))))
(pow phi1 2)
(* (pow phi1 2) (+ 1 (* -2 (/ phi2 phi1))))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi2 2) phi1)) (* 2 phi2)) phi1))))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi2 2) phi1)) (* 2 phi2)) phi1))))
(pow phi1 2)
(+ (* -2 (* phi1 phi2)) (pow phi1 2))
(+ (* phi2 (+ phi2 (* -2 phi1))) (pow phi1 2))
(+ (* phi2 (+ phi2 (* -2 phi1))) (pow phi1 2))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (/ (pow phi1 2) (pow phi2 2)))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (/ (pow phi1 2) (pow phi2 2)))))
(pow phi2 2)
(* (pow phi2 2) (+ 1 (* -2 (/ phi1 phi2))))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi1 2) phi2)) (* 2 phi1)) phi2))))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (pow phi1 2) phi2)) (* 2 phi1)) phi2))))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* 1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))) (* 1/2 (* lambda1 (sin (* 1/2 phi2)))))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* 1/8 (* lambda1 (cos (* 1/2 phi2)))))))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* -1 (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* -1 (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* -1 (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(* -1 (* lambda1 (cos (* 1/2 phi1))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi1)))) (* 1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* 1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))) (* 1/2 (* lambda1 (sin (* 1/2 phi1)))))))
(+ (* -1 (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* 1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/8 (* lambda1 (cos (* 1/2 phi1)))))))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* -1 (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* -1 (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* -1 (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
(* -1 lambda1)
Outputs
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
(* R (sqrt (+ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 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 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))
(+ (* 1/2 (* (* R (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.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)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (* phi2 (+ (* 1/2 (* (* R (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (* R (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R phi2) (+.f64 (+.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) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 R (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (*.f64 (*.f64 R phi2) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (+.f64 (+.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) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))))))))
(* R phi2)
(*.f64 R phi2)
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (* 1/2 (/ (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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) phi2) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))))
(* phi2 (+ R (+ (* -1 (/ (* R phi1) phi2)) (+ (* 1/2 (/ (* R (* phi1 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi2 3))) (* 1/2 (/ (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 2)))))))
(*.f64 phi2 (+.f64 (-.f64 R (/.f64 (*.f64 R phi1) phi2)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R phi1) phi2) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (-.f64 lambda1 lambda2) phi2)))) (*.f64 R (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (-.f64 lambda1 lambda2) phi2))))))))
(* -1 (* R phi2))
(-.f64 #s(literal 0 binary64) (*.f64 R phi2))
(* -1 (* phi2 (+ R (* -1 (/ (* R phi1) phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)))
(* -1 (* phi2 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi1 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 R phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 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 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))
(+ (* 1/2 (* (* R (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 R phi1) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(+ (* R (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (* phi1 (+ (* 1/2 (* (* R (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (* R (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (*.f64 R (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (*.f64 R phi1) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.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 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 R (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (*.f64 (*.f64 R phi1) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.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 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))))))
(* R phi1)
(*.f64 R phi1)
(* phi1 (+ R (* -1 (/ (* R phi2) phi1))))
(*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (* 1/2 (/ (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) R) phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))))
(* phi1 (+ R (+ (* -1 (/ (* R phi2) phi1)) (+ (* 1/2 (/ (* R (* phi2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (pow phi1 3))) (* 1/2 (/ (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 (-.f64 R (/.f64 (*.f64 R phi2) phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 (*.f64 R phi2) phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (*.f64 R (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 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 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1/2 (/ (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 #s(literal -1/2 binary64) (*.f64 R (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* R (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)))) (* 1/2 (/ (* R (* phi2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (/.f64 (*.f64 (*.f64 R phi2) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) phi1))) phi1)) phi1)))
(* R (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda1) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda1 (+ (* -1 (* (* R (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 R (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 R (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (*.f64 (*.f64 R lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 lambda1 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 lambda1 (-.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))
(* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* (pow lambda1 3) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))))
(*.f64 lambda1 (-.f64 (+.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 (*.f64 lambda1 lambda1))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))
(* -1 (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* -1 (* lambda1 (+ (* -1 (/ (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda1)))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1))) lambda1)))
(* -1 (* lambda1 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda2 (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda1)) (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda1)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda2) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1)))
(* R (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))
(*.f64 R (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))
(+ (* -1 (* (* R (* lambda1 (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* R (* lambda2 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(+ (* R (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (* lambda2 (+ (* -1 (* (* R (* lambda1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (* R (* lambda1 (* lambda2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))) (* 1/2 (* (* R (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (*.f64 R lambda1) (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64))))) (*.f64 R (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 (*.f64 R lambda1) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)))))))
(* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 lambda2 (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 lambda2 (-.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))
(* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* (pow lambda2 3) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (* (pow lambda2 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))))
(*.f64 lambda2 (-.f64 (+.f64 (+.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 (*.f64 lambda2 lambda2))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))
(* -1 (* R (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* -1 (* lambda2 (+ (* -1 (/ (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1/2 (/ (* R (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (+.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2))) lambda2)))
(* -1 (* lambda2 (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* R (* lambda1 (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* 1/2 (/ (* R (pow (- phi1 phi2) 2)) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* R (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (-.f64 (*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 (*.f64 R lambda1) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 R (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2)))
(sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))
(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* 1/2 (* (* phi2 (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi2 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (* phi2 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi2 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (+.f64 (+.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) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))) (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))) (* phi2 (+ (* 1/2 (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (* phi2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2))))))) (* 1/2 (* (* phi2 (- (* (+ (* 1/24 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1)))) (* 1/8 (* (cos (* 1/2 phi1)) (sin (* 1/2 phi1))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi1)) 2)) (* 1/4 (pow (sin (* 1/2 phi1)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi1) (* -1 (* (cos (* 1/2 phi1)) (* (sin (* 1/2 phi1)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi1)) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (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 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))) (*.f64 phi2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))) (+.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))) (*.f64 phi2 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (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 (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)) #s(literal -1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1)))))) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 2 binary64))) (*.f64 phi1 phi1))))))))))))
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (* 1/2 (/ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (-.f64 lambda1 lambda2) phi2))))))
(* phi2 (+ 1 (+ (* -1 (/ phi1 phi2)) (+ (* 1/2 (/ (* phi1 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi2 3))) (* 1/2 (/ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (*.f64 (/.f64 phi1 phi2) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (-.f64 lambda1 lambda2) phi2)))) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi2) (/.f64 (-.f64 lambda1 lambda2) phi2)))))))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1/2 (/ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 #s(literal -1/2 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2)))) phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ (+ phi1 (* -1 (/ (+ (* 1/2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi1 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi1 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi2))))) phi2)) phi2)))
(sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))
(sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* 1/2 (* (* phi1 (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 phi1 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (* phi1 (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 phi1 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))) (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))))))
(+ (sqrt (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))) (* phi1 (+ (* 1/2 (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (* phi1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2))))))) (* 1/2 (* (* phi1 (- (* (+ (* 1/24 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2)))) (* 1/8 (* (cos (* 1/2 phi2)) (sin (* 1/2 phi2))))) (pow (- lambda1 lambda2) 2)) (* 1/2 (/ (* (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) (- (+ 1 (* (+ (* -1/4 (pow (cos (* 1/2 phi2)) 2)) (* 1/4 (pow (sin (* 1/2 phi2)) 2))) (pow (- lambda1 lambda2) 2))) (* 1/4 (/ (pow (+ (* -2 phi2) (* -1 (* (cos (* 1/2 phi2)) (* (sin (* 1/2 phi2)) (pow (- lambda1 lambda2) 2))))) 2) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))) (sqrt (/ 1 (+ (* (pow (cos (* 1/2 phi2)) 2) (pow (- lambda1 lambda2) 2)) (pow phi2 2)))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (*.f64 phi1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (*.f64 phi1 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal 1/6 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.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 #s(literal -1/4 binary64) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (-.f64 (*.f64 phi2 #s(literal -2 binary64)) (*.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)))) #s(literal 2 binary64))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64)))))))) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) (pow.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 2 binary64))))))))))))))
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (* 1/2 (/ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1))))))
(* phi1 (+ 1 (+ (* -1 (/ phi2 phi1)) (+ (* 1/2 (/ (* phi2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (pow phi1 3))) (* 1/2 (/ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) (pow phi1 2)))))))
(*.f64 phi1 (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (/.f64 phi2 phi1) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (/.f64 (-.f64 lambda1 lambda2) phi1) (/.f64 (-.f64 lambda1 lambda2) phi1)))))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1/2 (/ (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2)) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1)))) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* 1/2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (pow (- lambda1 lambda2) 2))) (* 1/2 (/ (* phi2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (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 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2))) (*.f64 phi2 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (-.f64 lambda1 lambda2) (-.f64 lambda1 lambda2)) phi1))))) phi1)) phi1)))
(sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 lambda1 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(+ (sqrt (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda1 (+ (* -1 (* (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda1 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda2 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))) (*.f64 lambda1 (-.f64 (*.f64 lambda1 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))) (*.f64 (*.f64 lambda1 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (*.f64 lambda2 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64))) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2))) #s(literal 3 binary64)))))))) (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) lambda2) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda2 lambda2)))))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1)))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* (pow lambda1 3) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda1 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 lambda1 (-.f64 (-.f64 (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda1 lambda1)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 lambda1 (*.f64 lambda1 lambda1))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1))) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda2 (pow (- phi1 phi2) 2)) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda1)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 lambda2 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda1)) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))
(sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* -1 (* (* lambda1 (* lambda2 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))
(-.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 (*.f64 (*.f64 lambda1 lambda2) (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda2 (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (*.f64 lambda2 (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))))) (*.f64 lambda1 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))))))
(+ (sqrt (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))) (* lambda2 (+ (* -1 (* (* lambda1 (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* lambda2 (+ (* 1/2 (* (sqrt (/ 1 (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)))))) (* 1/2 (* (* lambda1 (* lambda2 (* (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (- (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2) (/ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 4)) (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2))))))) (sqrt (/ 1 (pow (+ (* (pow lambda1 2) (pow (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) 2)) (pow (- phi1 phi2) 2)) 3))))))))))
(+.f64 (sqrt.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))) (*.f64 lambda2 (-.f64 (*.f64 lambda2 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))) (*.f64 lambda1 (*.f64 (*.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) lambda2) (-.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (/.f64 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 4 binary64)) (*.f64 lambda1 lambda1)) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))) #s(literal 3 binary64))))))))) (*.f64 lambda1 (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 (pow.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) #s(literal 2 binary64)) (*.f64 lambda1 lambda1))))))))))
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2)
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 lambda2 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 lambda2)))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* (pow lambda2 3) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (+ (* 1/2 (/ (pow (- phi1 phi2) 2) (* (pow lambda2 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))))
(*.f64 lambda2 (-.f64 (-.f64 (+.f64 (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 lambda2 lambda2)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (/.f64 lambda1 lambda2) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (*.f64 lambda2 lambda2))) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1/2 (/ (pow (- phi1 phi2) 2) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 #s(literal -1/2 binary64) (/.f64 (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* lambda1 (pow (- phi1 phi2) 2)) (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) (* 1/2 (/ (pow (- phi1 phi2) 2) (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))) lambda2)) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (/.f64 (*.f64 lambda1 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (/.f64 (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) lambda2)) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* (cos (* 1/2 phi1)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))
(+ (* -1/2 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* -1/8 (* phi2 (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))))))
(+ (* phi2 (+ (* -1/2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2))) (* phi2 (+ (* -1/8 (* (cos (* 1/2 phi1)) (- lambda1 lambda2))) (* 1/48 (* phi2 (* (sin (* 1/2 phi1)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi1)) (- lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/48 binary64) phi2) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2))))))))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (cos (* 1/2 phi2)) (- lambda1 lambda2))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))
(+ (* -1/2 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* -1/8 (* phi1 (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal -1/8 binary64) phi1) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))))
(+ (* phi1 (+ (* -1/2 (* (sin (* 1/2 phi2)) (- lambda1 lambda2))) (* phi1 (+ (* -1/8 (* (cos (* 1/2 phi2)) (- lambda1 lambda2))) (* 1/48 (* phi1 (* (sin (* 1/2 phi2)) (- lambda1 lambda2)))))))) (* (cos (* 1/2 phi2)) (- lambda1 lambda2)))
(+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 phi1 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))) (*.f64 (*.f64 #s(literal 1/48 binary64) phi1) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2))))))))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))) (- lambda1 lambda2))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 lambda1 (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)
(* -1 (* lambda1 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* -1 (* lambda1 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* -1 (* lambda1 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda1))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2) lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))
(*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1)
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2))
(+ (* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))) (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(-.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda2))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* lambda2 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* lambda2 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* lambda2 (+ (* -1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)))
(*.f64 lambda2 (-.f64 (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(* -1 (* lambda2 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (+ (* -1 (/ (* lambda1 (+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))) lambda2)) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda2) (-.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (/.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) lambda1) lambda2)) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* -1/8 (* phi2 (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* phi2 (+ (* -1/2 (sin (* 1/2 phi1))) (* phi2 (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/48 (* phi2 (sin (* 1/2 phi1)))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)) (*.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))))))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (cos (* 1/2 phi2)) (* phi1 (+ (* -1/2 (sin (* 1/2 phi2))) (* -1/8 (* phi1 (cos (* 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 (+ (* -1/2 (sin (* 1/2 phi2))) (* phi1 (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/48 (* phi1 (sin (* 1/2 phi2)))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 phi1 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)) (*.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))))))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* (sin (* 1/2 phi1)) (sin (* 1/2 phi2)))) (* (cos (* 1/2 phi1)) (cos (* 1/2 phi2))))
(-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -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 (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(/ (* R (* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))) (+ 1 (/ phi2 phi1)))
(/.f64 (*.f64 (*.f64 R phi1) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* R phi2)
(*.f64 R phi2)
(+ (* -1 (* R phi1)) (* R phi2))
(-.f64 (*.f64 R phi2) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(-.f64 (*.f64 R phi2) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(-.f64 (*.f64 R phi2) (*.f64 R phi1))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* phi1 (+ (* -1 R) (/ (* R phi2) phi1)))
(*.f64 phi1 (-.f64 (/.f64 (*.f64 R phi2) phi1) R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (* R phi2) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (*.f64 R phi2) phi1)))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(-.f64 (*.f64 R phi2) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(-.f64 (*.f64 R phi2) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* R phi2))
(-.f64 (*.f64 R phi2) (*.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))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* phi2 (+ R (* -1 (/ (* R phi1) phi2))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(* R phi2)
(*.f64 R phi2)
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
(* -1 (* phi2 (+ (* -1 R) (/ (* R phi1) phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 (/.f64 (*.f64 R phi1) phi2) R))
phi2
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -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 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(/ (pow phi2 2) phi1)
(/.f64 (*.f64 phi2 phi2) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) phi1)
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) phi1)
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64)))
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64)))
(* phi1 (- (/ (pow phi2 2) (pow phi1 2)) 1))
(*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64)))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))
(* -1 (* phi1 (+ 1 (* -1 (/ (pow phi2 2) (pow phi1 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)
(+ (* -1 phi1) (/ (pow phi2 2) phi1))
(-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)
(/ (pow phi2 2) phi1)
(/.f64 (*.f64 phi2 phi2) phi1)
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(/ (pow phi2 2) phi1)
(/.f64 (*.f64 phi2 phi2) phi1)
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ (* -1 (/ phi1 (pow phi2 2))) (/ 1 phi1)))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 phi1 (*.f64 phi2 phi2))))
-1
#s(literal -1 binary64)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (*.f64 phi2 phi2))))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (*.f64 phi2 phi2))))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (*.f64 phi2 phi2))))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (*.f64 phi2 phi2))))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (*.f64 phi2 phi2))))
(* (pow phi2 2) (- (/ 1 (pow phi1 2)) (/ 1 (pow phi2 2))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (*.f64 phi2 phi2))))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) (pow phi1 2))
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (*.f64 phi1 phi1))
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) (pow phi1 2))
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (*.f64 phi1 phi1))
(/ (+ (* -1 (pow phi1 2)) (pow phi2 2)) (pow phi1 2))
(/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (*.f64 phi1 phi1))
-1
#s(literal -1 binary64)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
-1
#s(literal -1 binary64)
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(- (/ (pow phi2 2) (pow phi1 2)) 1)
(+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1 (/ (* R (* (pow phi1 3) (pow (- 1 (/ phi2 phi1)) 3))) (+ (* -2 (* phi1 phi2)) (pow phi1 2))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 R (*.f64 phi1 (*.f64 phi1 phi1))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))))
(* -1/2 (/ (* R (pow phi2 2)) phi1))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 phi2 phi2)) phi1))
(/ (+ (* -1 (* phi1 (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))))) (* -1/2 (* R (pow phi2 2)))) phi1)
(/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))))) phi1)
(/ (+ (* -1/2 (* R (pow phi2 2))) (* phi1 (+ (* -1 (* phi1 (- (* -1/2 (/ (* R (+ (* -2 phi2) (* -1 phi2))) phi2)) (* -1/2 (/ (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))) phi2))))) (* -1 (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))))))) phi1)
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
(/ (+ (* -1/2 (* R (pow phi2 2))) (* phi1 (+ (* -1 (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2)))) (* phi1 (+ (* -1 (* phi1 (- (* -1/2 (/ R phi2)) (* -1/2 (/ (- (* -1/2 (/ (* R (+ (* -2 phi2) (* -1 phi2))) phi2)) (* -1/2 (/ (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))) phi2))) phi2))))) (* -1 (- (* -1/2 (/ (* R (+ (* -2 phi2) (* -1 phi2))) phi2)) (* -1/2 (/ (- (* -1/2 (/ (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi2)) (* -1/4 (* R phi2))) phi2))))))))) phi1)
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))) phi2)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* phi1 (+ (* -1 R) (* -1 (/ (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2))) phi1))))
(*.f64 phi1 (-.f64 (-.f64 #s(literal 0 binary64) R) (/.f64 (+.f64 (*.f64 R (*.f64 phi2 #s(literal -3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 R phi2))) phi1)))
(* phi1 (+ (* -1 R) (+ (* -1 (/ (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2))) phi1)) (* -1 (/ (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* -2 (* phi2 (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2)))))) (pow phi1 2))))))
(*.f64 phi1 (-.f64 (-.f64 (-.f64 #s(literal 0 binary64) R) (/.f64 (+.f64 (*.f64 R (*.f64 phi2 #s(literal -3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 R phi2))) phi1)) (/.f64 (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) (*.f64 #s(literal 2 binary64) (*.f64 phi2 (+.f64 (*.f64 R (*.f64 phi2 #s(literal -3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 R phi2)))))) (*.f64 phi1 phi1))))
(* phi1 (+ (* -1 R) (+ (* -1 (/ (- (* -1 (* R (pow phi2 3))) (* -2 (* phi2 (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* -2 (* phi2 (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2))))))))) (pow phi1 3))) (+ (* -1 (/ (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2))) phi1)) (* -1 (/ (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* -2 (* phi2 (- (* R (+ (* -2 phi2) (* -1 phi2))) (* -2 (* R phi2)))))) (pow phi1 2)))))))
(*.f64 phi1 (-.f64 (-.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 R (*.f64 phi2 #s(literal -3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 R phi2))) phi1)) (/.f64 (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) (*.f64 #s(literal 2 binary64) (*.f64 phi2 (+.f64 (*.f64 R (*.f64 phi2 #s(literal -3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 R phi2)))))) (*.f64 phi1 phi1))) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi2 (*.f64 phi2 phi2)))) (*.f64 (*.f64 phi2 #s(literal -2 binary64)) (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) (*.f64 #s(literal 2 binary64) (*.f64 phi2 (+.f64 (*.f64 R (*.f64 phi2 #s(literal -3 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 R phi2)))))))) (*.f64 phi1 (*.f64 phi1 phi1)))) R))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(* -1 (* phi1 (+ R (* -1 (/ (- (* R (+ phi2 (* 2 phi2))) (* 2 (* R phi2))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (- (+ (* -1 (/ (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* 2 (* phi2 (- (* R (+ phi2 (* 2 phi2))) (* 2 (* R phi2)))))) phi1)) (* R (+ phi2 (* 2 phi2)))) (* 2 (* R phi2))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (-.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (/.f64 (-.f64 (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) (*.f64 (*.f64 phi2 #s(literal 2 binary64)) (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))))) phi1)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))) phi1)))
(* -1 (* phi1 (+ R (* -1 (/ (- (+ (* -1 (/ (- (+ (* -1 (/ (- (* R (pow phi2 3)) (* 2 (* phi2 (- (* R (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* 2 (* phi2 (- (* R (+ phi2 (* 2 phi2))) (* 2 (* R phi2))))))))) phi1)) (* R (+ (* 2 (pow phi2 2)) (pow phi2 2)))) (* 2 (* phi2 (- (* R (+ phi2 (* 2 phi2))) (* 2 (* R phi2)))))) phi1)) (* R (+ phi2 (* 2 phi2)))) (* 2 (* R phi2))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (-.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (/.f64 (+.f64 (-.f64 (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) (/.f64 (-.f64 (*.f64 R (*.f64 phi2 (*.f64 phi2 phi2))) (*.f64 (*.f64 phi2 #s(literal 2 binary64)) (-.f64 (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) (*.f64 (*.f64 phi2 #s(literal 2 binary64)) (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))))))) phi1)) (*.f64 #s(literal -2 binary64) (*.f64 phi2 (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2)))))) phi1)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))) phi1)))
(* -1 (* R phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* -1 (* phi2 (- (* -3 R) (* -2 R)))))
(*.f64 #s(literal -1 binary64) (-.f64 (*.f64 R phi1) (*.f64 R phi2)))
(+ (* -1 (* R phi1)) (* phi2 (+ (* -1 (* phi2 (- (* 3 (/ R phi1)) (* -2 (/ (- (* -3 R) (* -2 R)) phi1))))) (* -1 (- (* -3 R) (* -2 R))))))
(-.f64 (*.f64 phi2 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) R) phi1) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) R) phi1)))) R))) (*.f64 R phi1))
(+ (* -1 (* R phi1)) (* phi2 (+ (* -1 (- (* -3 R) (* -2 R))) (* phi2 (+ (* -1 (* phi2 (- (* -1 (/ R (pow phi1 2))) (* -2 (/ (- (* 3 (/ R phi1)) (* -2 (/ (- (* -3 R) (* -2 R)) phi1))) phi1))))) (* -1 (- (* 3 (/ R phi1)) (* -2 (/ (- (* -3 R) (* -2 R)) phi1)))))))))
(-.f64 (*.f64 phi2 (-.f64 (*.f64 phi2 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 R (*.f64 phi1 phi1))) (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) R) phi1) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) R) phi1))) phi1)))) (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) R) phi1) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) R) phi1))))) (-.f64 #s(literal 0 binary64) R))) (*.f64 R phi1))
(* -1/2 (/ (* R (pow phi2 2)) phi1))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 phi2 phi2)) phi1))
(* (pow phi2 2) (+ (* -1 (/ (- (* -3/2 R) (* -1/4 R)) phi2)) (* -1/2 (/ R phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (*.f64 R #s(literal -5/4 binary64)) phi2)))
(* (pow phi2 2) (+ (* -1 (/ (- (* -3/2 R) (* -1/4 R)) phi2)) (+ (* -1 (/ (- (* 3/2 (* R phi1)) (* -1/2 (* phi1 (- (* -3/2 R) (* -1/4 R))))) (pow phi2 2))) (* -1/2 (/ R phi1)))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (*.f64 (*.f64 R phi1) #s(literal 3/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 R #s(literal -5/4 binary64)))) (*.f64 phi2 phi2))) (/.f64 (*.f64 R #s(literal -5/4 binary64)) phi2)))
(* (pow phi2 2) (+ (* -1 (/ (- (* -3/2 R) (* -1/4 R)) phi2)) (+ (* -1 (/ (- (* -1/2 (* R (pow phi1 2))) (* -1/2 (* phi1 (- (* 3/2 (* R phi1)) (* -1/2 (* phi1 (- (* -3/2 R) (* -1/4 R)))))))) (pow phi2 3))) (+ (* -1 (/ (- (* 3/2 (* R phi1)) (* -1/2 (* phi1 (- (* -3/2 R) (* -1/4 R))))) (pow phi2 2))) (* -1/2 (/ R phi1))))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (*.f64 (*.f64 R phi1) #s(literal 3/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 R #s(literal -5/4 binary64)))) (*.f64 phi2 phi2))) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (*.f64 phi1 phi1)) (*.f64 phi1 (-.f64 (*.f64 (*.f64 R phi1) #s(literal 3/2 binary64)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi1) (*.f64 R #s(literal -5/4 binary64))))))) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (*.f64 R #s(literal -5/4 binary64)) phi2)))
(* -1/2 (/ (* R (pow phi2 2)) phi1))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 phi2 phi2)) phi1))
(* (pow phi2 2) (- (+ (* -1/2 (/ R phi1)) (* 3/2 (/ R phi2))) (* 1/4 (/ R phi2))))
(*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (*.f64 R #s(literal 5/4 binary64)) phi2)))
(* (pow phi2 2) (+ (* -1 (/ (- (+ (* -1 (- (* 3/2 R) (* 1/4 R))) (* 3/2 (/ (* R phi1) phi2))) (* 1/2 (/ (* phi1 (- (* 3/2 R) (* 1/4 R))) phi2))) phi2)) (* -1/2 (/ R phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 R #s(literal 5/4 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 R phi1) #s(literal 3/2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 R #s(literal 5/4 binary64))))) phi2)) phi2)))
(* (pow phi2 2) (+ (* -1 (/ (+ (* -1 (- (* 3/2 R) (* 1/4 R))) (* -1 (/ (- (+ (* -1 (- (* 3/2 (* R phi1)) (* 1/2 (* phi1 (- (* 3/2 R) (* 1/4 R)))))) (* 1/2 (/ (* R (pow phi1 2)) phi2))) (* 1/2 (/ (* phi1 (- (* 3/2 (* R phi1)) (* 1/2 (* phi1 (- (* 3/2 R) (* 1/4 R)))))) phi2))) phi2))) phi2)) (* -1/2 (/ R phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 R #s(literal 5/4 binary64))) (/.f64 (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 R (*.f64 phi1 phi1))) phi2) (+.f64 (*.f64 (*.f64 R phi1) #s(literal 3/2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 R #s(literal 5/4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 R phi1) #s(literal 3/2 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (*.f64 R #s(literal 5/4 binary64)))))) phi2))) phi2)) phi2)))
(* -1/2 (/ (pow phi2 2) phi1))
(/.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) phi1)
(/ (+ (* -1 (* phi1 (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)))) (* -1/2 (pow phi2 2))) phi1)
(/.f64 (-.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)))) phi1)
(/ (+ (* -1/2 (pow phi2 2)) (* phi1 (+ (* -1 (* phi1 (- (* -1/2 (/ (+ (* -2 phi2) (* -1 phi2)) phi2)) (* -1/2 (/ (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)) phi2))))) (* -1 (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)))))) phi1)
(/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1)
(/ (+ (* -1/2 (pow phi2 2)) (* phi1 (+ (* -1 (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2))) (* phi1 (+ (* -1 (- (* -1/2 (/ (+ (* -2 phi2) (* -1 phi2)) phi2)) (* -1/2 (/ (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)) phi2)))) (* phi1 (+ (* -1/2 (/ (- (* -1/2 (/ (+ (* -2 phi2) (* -1 phi2)) phi2)) (* -1/2 (/ (- (* -1/2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi2)) (* -1/4 phi2)) phi2))) phi2)) (* 1/2 (/ 1 phi2))))))))) phi1)
(/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) phi2) (/.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (+ (* -1 (/ (pow phi2 2) (pow phi1 2))) (/ phi2 phi1)) 1))
(*.f64 phi1 (+.f64 (-.f64 (/.f64 phi2 phi1) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) #s(literal -1 binary64)))
(* phi1 (- (+ (* -1 (/ (- (* -1 (pow phi2 3)) (* -2 (pow phi2 3))) (pow phi1 3))) (+ (* -1 (/ (pow phi2 2) (pow phi1 2))) (/ phi2 phi1))) 1))
(*.f64 phi1 (+.f64 (-.f64 (-.f64 (/.f64 phi2 phi1) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (/.f64 (*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) #s(literal 1 binary64)) (*.f64 phi1 (*.f64 phi1 phi1)))) #s(literal -1 binary64)))
(* -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 (/ (pow phi2 2) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (*.f64 phi2 phi2) phi1)) phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ (+ phi2 (* -1 (/ (+ (* -1 (/ (- (pow phi2 3) (* 2 (pow phi2 3))) phi1)) (pow phi2 2)) phi1))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 phi2 (/.f64 (-.f64 (*.f64 phi2 phi2) (/.f64 (+.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 #s(literal -2 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) phi1)) phi1)) phi1)))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ (* -1 phi1) (* phi2 (+ 1 (* -1 (/ phi2 phi1)))))
(-.f64 (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1)
(+ (* -1 phi1) (* phi2 (+ 1 (* phi2 (- (* -1 (/ phi2 (pow phi1 2))) (/ 1 phi1))))))
(-.f64 (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) phi1))))) phi1)
(* -1/2 (/ (pow phi2 2) phi1))
(/.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) phi1)
(* (pow phi2 2) (- (* 5/4 (/ 1 phi2)) (* 1/2 (/ 1 phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 5/4 binary64) phi2) (/.f64 #s(literal 1/2 binary64) phi1)))
(* (pow phi2 2) (- (+ (* -1 (/ (- (* 3/2 phi1) (* 5/8 phi1)) (pow phi2 2))) (* 5/4 (/ 1 phi2))) (* 1/2 (/ 1 phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 (/.f64 #s(literal 5/4 binary64) phi2) (/.f64 (*.f64 phi1 #s(literal 7/8 binary64)) (*.f64 phi2 phi2))) (/.f64 #s(literal 1/2 binary64) phi1)))
(* (pow phi2 2) (- (+ (* -1 (/ (- (* -1/2 (pow phi1 2)) (* -1/2 (* phi1 (- (* 3/2 phi1) (* 5/8 phi1))))) (pow phi2 3))) (+ (* -1 (/ (- (* 3/2 phi1) (* 5/8 phi1)) (pow phi2 2))) (* 5/4 (/ 1 phi2)))) (* 1/2 (/ 1 phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 (-.f64 (/.f64 #s(literal 5/4 binary64) phi2) (/.f64 (*.f64 phi1 #s(literal 7/8 binary64)) (*.f64 phi2 phi2))) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 phi1 phi1) (*.f64 phi1 (*.f64 phi1 #s(literal 7/8 binary64))))) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 #s(literal 1/2 binary64) phi1)))
(* -1/2 (/ (pow phi2 2) phi1))
(/.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) phi1)
(* (pow phi2 2) (- (* 5/4 (/ 1 phi2)) (* 1/2 (/ 1 phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (/.f64 #s(literal 5/4 binary64) phi2) (/.f64 #s(literal 1/2 binary64) phi1)))
(* (pow phi2 2) (- (* -1 (/ (- (* 3/2 (/ phi1 phi2)) (+ 5/4 (* 5/8 (/ phi1 phi2)))) phi2)) (* 1/2 (/ 1 phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (/.f64 (*.f64 phi1 #s(literal 3/2 binary64)) phi2) (+.f64 #s(literal 5/4 binary64) (*.f64 (/.f64 phi1 phi2) #s(literal 5/8 binary64)))) phi2)) (/.f64 #s(literal 1/2 binary64) phi1)))
(* (pow phi2 2) (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (- (* 3/2 phi1) (* 5/8 phi1))) (* 1/2 (/ (pow phi1 2) phi2))) (* 1/2 (/ (* phi1 (- (* 3/2 phi1) (* 5/8 phi1))) phi2))) phi2)) 5/4) phi2)) (* 1/2 (/ 1 phi1))))
(*.f64 (*.f64 phi2 phi2) (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 phi1 phi1) phi2)) (*.f64 phi1 #s(literal 7/8 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 phi1 (/.f64 (*.f64 phi1 #s(literal 7/8 binary64)) phi2)))) phi2)) #s(literal -5/4 binary64)) phi2)) (/.f64 #s(literal 1/2 binary64) phi1)))
(* -2 (/ phi1 (pow phi2 2)))
(*.f64 #s(literal -2 binary64) (/.f64 phi1 (*.f64 phi2 phi2)))
(* phi1 (- (* phi1 (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3)))) (* 2 (/ 1 (pow phi2 2)))))
(*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (pow.f64 phi2 #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 #s(literal 2 binary64) (*.f64 phi2 phi2))))
(* phi1 (- (* phi1 (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (+ (* phi1 (+ (* -2 (/ (+ (* -2 phi2) (* -1 phi2)) (pow phi2 5))) (/ (* (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3))) (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi2 3)))) (/ 1 (pow phi2 3))))) (* 2 (/ 1 (pow phi2 2)))))
(*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (pow.f64 phi2 #s(literal 5 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 phi2))) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 phi2 #s(literal -3 binary64))) (pow.f64 phi2 #s(literal 5 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (pow.f64 phi2 #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi2 (*.f64 phi2 phi2))))))))) (/.f64 #s(literal 2 binary64) (*.f64 phi2 phi2))))
(* phi1 (- (* phi1 (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (+ (* phi1 (+ (* -2 (/ (+ (* -2 phi2) (* -1 phi2)) (pow phi2 5))) (+ (* -1 (* phi1 (- (* 2 (/ 1 (pow phi2 5))) (+ (/ (* (+ (* -2 phi2) (* -1 phi2)) (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3)))) (pow phi2 3)) (/ (* (+ (* -2 (/ (+ (* -2 phi2) (* -1 phi2)) (pow phi2 5))) (/ (* (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3))) (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi2 3))) (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi2 3)))))) (/ (* (+ (* -2 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi2 5))) (/ 1 (pow phi2 3))) (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi2 3))))) (/ 1 (pow phi2 3))))) (* 2 (/ 1 (pow phi2 2)))))
(*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (pow.f64 phi2 #s(literal 5 binary64)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 phi2))) (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 phi2 #s(literal -3 binary64))) (pow.f64 phi2 #s(literal 5 binary64))) (-.f64 (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (pow.f64 phi2 #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi2 (*.f64 phi2 phi2)))) (*.f64 phi1 (-.f64 (/.f64 #s(literal 2 binary64) (pow.f64 phi2 #s(literal 5 binary64))) (+.f64 (/.f64 (*.f64 (*.f64 phi2 #s(literal -3 binary64)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (pow.f64 phi2 #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 phi2))))) (*.f64 phi2 (*.f64 phi2 phi2))) (*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 phi2 #s(literal -3 binary64))) (pow.f64 phi2 #s(literal 5 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (pow.f64 phi2 #s(literal 5 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 phi2 (*.f64 phi2 phi2)))) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi2 (*.f64 phi2 phi2))))) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi2 (*.f64 phi2 phi2))))))))))))) (/.f64 #s(literal 2 binary64) (*.f64 phi2 phi2))))
(/ -1 phi1)
(/.f64 #s(literal -1 binary64) phi1)
(/ (- (* -1 (/ phi2 phi1)) 1) phi1)
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 phi1)) #s(literal -1 binary64)) phi1)
(/ (- (+ (* -1 (/ phi2 phi1)) (+ (* 2 (/ (pow phi2 2) (pow phi1 2))) (+ (/ (* phi2 (+ (* -2 phi2) (* -1 phi2))) (pow phi1 2)) (/ (pow phi2 2) (pow phi1 2))))) 1) phi1)
(/.f64 (+.f64 (-.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 phi1)) (/.f64 (*.f64 phi2 (*.f64 phi2 #s(literal -3 binary64))) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (/.f64 phi2 phi1)) #s(literal -1 binary64)) phi1)
(/ (- (+ (* -1 (/ phi2 phi1)) (+ (* -1 (/ (* (+ (* -2 phi2) (* -1 phi2)) (+ (* 2 (pow phi2 2)) (+ (* phi2 (+ (* -2 phi2) (* -1 phi2))) (pow phi2 2)))) (pow phi1 3))) (+ (* -1 (/ (pow phi2 3) (pow phi1 3))) (+ (* 2 (/ (pow phi2 2) (pow phi1 2))) (+ (/ (* phi2 (+ (* -2 phi2) (* -1 phi2))) (pow phi1 2)) (+ (/ (* phi2 (+ (* 2 (pow phi2 2)) (pow phi2 2))) (pow phi1 3)) (/ (pow phi2 2) (pow phi1 2)))))))) 1) phi1)
(/.f64 (+.f64 (-.f64 (-.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 phi1)) (+.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 #s(literal -3 binary64))) (*.f64 phi1 phi1)) (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (*.f64 phi2 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))))))) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1)))) (/.f64 (*.f64 (*.f64 phi2 #s(literal -3 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 phi2)) (+.f64 (*.f64 phi2 phi2) (*.f64 phi2 (*.f64 phi2 #s(literal -3 binary64)))))) (*.f64 phi1 (*.f64 phi1 phi1)))) (/.f64 phi2 phi1)) #s(literal -1 binary64)) phi1)
(/ -1 phi1)
(/.f64 #s(literal -1 binary64) phi1)
(* -1 (/ (+ 1 (/ phi2 phi1)) phi1))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) phi1))
(* -1 (/ (+ 1 (* -1 (/ (- (+ (* -1 (/ (* phi2 (+ phi2 (* 2 phi2))) phi1)) (+ (* 2 (/ (pow phi2 2) phi1)) (/ (pow phi2 2) phi1))) phi2) phi1))) phi1))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 (*.f64 #s(literal 3 binary64) (/.f64 (*.f64 phi2 phi2) phi1)) (/.f64 (*.f64 phi2 (*.f64 #s(literal 3 binary64) phi2)) phi1)) phi2) phi1)) phi1))
(* -1 (/ (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* phi2 (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi1)) (+ (* -1 (/ (* (+ phi2 (* 2 phi2)) (+ (* -1 (* phi2 (+ phi2 (* 2 phi2)))) (+ (* 2 (pow phi2 2)) (pow phi2 2)))) phi1)) (/ (pow phi2 3) phi1))) (+ (* -1 (* phi2 (+ phi2 (* 2 phi2)))) (+ (* 2 (pow phi2 2)) (pow phi2 2)))) phi1)) phi2) phi1))) phi1))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (-.f64 (-.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) phi1) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) phi2) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi2 (*.f64 #s(literal 3 binary64) phi2)))) phi1)) (/.f64 (*.f64 phi2 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi1)) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi2 (*.f64 #s(literal 3 binary64) phi2)))) phi1)) phi2) phi1)) phi1))
(/ -1 phi1)
(/.f64 #s(literal -1 binary64) phi1)
(- (* -1 (/ phi2 (pow phi1 2))) (/ 1 phi1))
(-.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) phi1))
(- (* phi2 (- (* 2 (/ (pow phi2 2) (pow phi1 4))) (/ 1 (pow phi1 2)))) (/ 1 phi1))
(-.f64 (*.f64 phi2 (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 phi2 phi2)) (pow.f64 phi1 #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))) (/.f64 #s(literal 1 binary64) phi1))
(- (* phi2 (- (* (pow phi2 2) (+ (* 5 (/ phi2 (pow phi1 5))) (* 2 (/ 1 (pow phi1 4))))) (/ 1 (pow phi1 2)))) (/ 1 phi1))
(-.f64 (*.f64 phi2 (-.f64 (*.f64 (*.f64 phi2 phi2) (+.f64 (/.f64 (*.f64 #s(literal 5 binary64) phi2) (pow.f64 phi1 #s(literal 5 binary64))) (/.f64 #s(literal 2 binary64) (pow.f64 phi1 #s(literal 4 binary64))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)))) (/.f64 #s(literal 1 binary64) phi1))
(* -2 (/ phi1 (pow phi2 2)))
(*.f64 #s(literal -2 binary64) (/.f64 phi1 (*.f64 phi2 phi2)))
(/ (+ (* -2 phi1) (* -1 (/ (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2))) phi2))) (pow phi2 2))
(/.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 5 binary64)) phi2)) (*.f64 phi2 phi2))
(/ (+ (* -3 (/ (* phi1 (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2)))) (pow phi2 2))) (+ (* -2 phi1) (+ (* -1 (/ (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2))) phi2)) (* 6 (/ (pow phi1 3) (pow phi2 2)))))) (pow phi2 2))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 5 binary64)) phi2)) (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (-.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 6 binary64)) (*.f64 phi2 phi2)) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 5 binary64)) phi2)))) (*.f64 phi2 phi2))
(/ (+ (* -3 (/ (* phi1 (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2)))) (pow phi2 2))) (+ (* -2 phi1) (+ (* -2 (/ (pow phi1 4) (pow phi2 3))) (+ (* -1 (/ (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2))) phi2)) (+ (* 3 (/ (* phi1 (+ (* -3 (* phi1 (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2))))) (* 6 (pow phi1 3)))) (pow phi2 3))) (+ (* 3 (/ (* (pow phi1 2) (- (* -1 (pow phi1 2)) (* -6 (pow phi1 2)))) (pow phi2 3))) (* 6 (/ (pow phi1 3) (pow phi2 2))))))))) (pow phi2 2))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 5 binary64)) phi2)) (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (pow.f64 phi1 #s(literal 4 binary64))) (*.f64 phi2 (*.f64 phi2 phi2))) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 5 binary64)) phi2)) (+.f64 (*.f64 #s(literal 3 binary64) (*.f64 (/.f64 phi1 phi2) (/.f64 (+.f64 (*.f64 #s(literal -3 binary64) (*.f64 phi1 (*.f64 (*.f64 phi1 phi1) #s(literal 5 binary64)))) (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 6 binary64))) (*.f64 phi2 phi2)))) (+.f64 (/.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 6 binary64)) (*.f64 phi2 phi2)) (*.f64 (/.f64 #s(literal 3 binary64) phi2) (/.f64 (*.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal 5 binary64))) (*.f64 phi2 phi2)))))))) (*.f64 phi2 phi2))
(* -2 (/ phi1 (pow phi2 2)))
(*.f64 #s(literal -2 binary64) (/.f64 phi1 (*.f64 phi2 phi2)))
(/ (- (+ (* -2 phi1) (/ (pow phi1 2) phi2)) (* 6 (/ (pow phi1 2) phi2))) (pow phi2 2))
(/.f64 (+.f64 (*.f64 phi1 #s(literal -2 binary64)) (-.f64 (/.f64 (*.f64 phi1 phi1) phi2) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 6 binary64)) phi2))) (*.f64 phi2 phi2))
(/ (+ (* -2 phi1) (* -1 (/ (+ (* -1 (- (pow phi1 2) (* 6 (pow phi1 2)))) (* -1 (/ (+ (* 3 (* phi1 (- (pow phi1 2) (* 6 (pow phi1 2))))) (* 6 (pow phi1 3))) phi2))) phi2))) (pow phi2 2))
(/.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal -6 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 3 binary64) phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal -6 binary64))))) phi2)) phi2)) (*.f64 phi2 phi2))
(/ (+ (* -2 phi1) (* -1 (/ (+ (* -1 (- (pow phi1 2) (* 6 (pow phi1 2)))) (* -1 (/ (+ (* -1 (/ (+ (* -3 (* phi1 (+ (* 3 (* phi1 (- (pow phi1 2) (* 6 (pow phi1 2))))) (* 6 (pow phi1 3))))) (+ (* 2 (pow phi1 4)) (* 3 (* (pow phi1 2) (- (pow phi1 2) (* 6 (pow phi1 2))))))) phi2)) (+ (* 3 (* phi1 (- (pow phi1 2) (* 6 (pow phi1 2))))) (* 6 (pow phi1 3)))) phi2))) phi2))) (pow phi2 2))
(/.f64 (-.f64 (*.f64 phi1 #s(literal -2 binary64)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal -6 binary64)))) (/.f64 (-.f64 (+.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 3 binary64) phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal -6 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 phi1 #s(literal -3 binary64)) (+.f64 (*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 3 binary64) phi1) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal -6 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (pow.f64 phi1 #s(literal 4 binary64))) (*.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) (+.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 phi1 phi1) #s(literal -6 binary64)))))) phi2)) phi2)) phi2)) (*.f64 phi2 phi2))
(* -1 (pow phi1 3))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))
(+ (* -1 (pow phi1 3)) (* 3 (* (pow phi1 2) phi2)))
(-.f64 (*.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) phi2) (*.f64 phi1 (*.f64 phi1 phi1)))
(+ (* -1 (pow phi1 3)) (* phi2 (+ (* -3 (* phi1 phi2)) (* 3 (pow phi1 2)))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)))) (*.f64 phi1 (*.f64 phi1 phi1)))
(+ (* -1 (pow phi1 3)) (* phi2 (+ (* 3 (pow phi1 2)) (* phi2 (+ phi2 (* -3 phi1))))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -3 binary64)))))) (*.f64 phi1 (*.f64 phi1 phi1)))
(pow phi2 3)
(*.f64 phi2 (*.f64 phi2 phi2))
(* (pow phi2 3) (+ 1 (* -3 (/ phi1 phi2))))
(*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2)))
(* (pow phi2 3) (+ 1 (+ (* -3 (/ phi1 phi2)) (* 3 (/ (pow phi1 2) (pow phi2 2))))))
(*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2)) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) (*.f64 phi2 phi2))))
(* (pow phi2 3) (+ 1 (+ (* -3 (/ phi1 phi2)) (+ (* -1 (/ (pow phi1 3) (pow phi2 3))) (* 3 (/ (pow phi1 2) (pow phi2 2)))))))
(*.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2)) (-.f64 (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) (*.f64 phi2 phi2)) (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2))))))
(pow phi2 3)
(*.f64 phi2 (*.f64 phi2 phi2))
(* -1 (* (pow phi2 3) (- (* 3 (/ phi1 phi2)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi2 (*.f64 phi2 phi2))) (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) phi1) phi2) #s(literal -1 binary64)))
(* -1 (* (pow phi2 3) (- (* -1 (/ (+ (* -3 phi1) (* 3 (/ (pow phi1 2) phi2))) phi2)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi2 (*.f64 phi2 phi2))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 phi1 #s(literal -3 binary64)) (/.f64 (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)) phi2)) phi2)) #s(literal -1 binary64)))
(* -1 (* (pow phi2 3) (- (* -1 (/ (+ (* -3 phi1) (* -1 (/ (+ (* -3 (pow phi1 2)) (/ (pow phi1 3) phi2)) phi2))) phi2)) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi2 (*.f64 phi2 phi2))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 phi1 #s(literal -3 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 phi1 phi1) #s(literal -3 binary64)) (/.f64 (*.f64 phi1 (*.f64 phi1 phi1)) phi2)) phi2)) phi2)) #s(literal -1 binary64)))
(pow phi2 3)
(*.f64 phi2 (*.f64 phi2 phi2))
(+ (* -1 (* phi1 (+ (* 2 (pow phi2 2)) (pow phi2 2)))) (pow phi2 3))
(-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))))
(+ (* phi1 (+ (* -1 (* phi1 (+ (* -2 phi2) (* -1 phi2)))) (* -1 (+ (* 2 (pow phi2 2)) (pow phi2 2))))) (pow phi2 3))
(+.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (-.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi2 #s(literal -3 binary64)))) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))))
(+ (* phi1 (+ (* -1 (+ (* 2 (pow phi2 2)) (pow phi2 2))) (* phi1 (+ (* -1 phi1) (* -1 (+ (* -2 phi2) (* -1 phi2))))))) (pow phi2 3))
(+.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 phi2 #s(literal -3 binary64)))) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))))
(* -1 (pow phi1 3))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))
(* (pow phi1 3) (- (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) 1))
(*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi2 #s(literal -3 binary64))) phi1) #s(literal -1 binary64)))
(* (pow phi1 3) (- (+ (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi1 2)))) 1))
(*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (-.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi2 #s(literal -3 binary64))) phi1) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 phi1))) #s(literal -1 binary64)))
(* (pow phi1 3) (- (+ (* -1 (/ (+ (* -2 phi2) (* -1 phi2)) phi1)) (+ (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) (pow phi1 2))) (/ (pow phi2 3) (pow phi1 3)))) 1))
(*.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (+.f64 (-.f64 (-.f64 (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (*.f64 phi1 phi1))) (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi1)) #s(literal -1 binary64)))
(* -1 (pow phi1 3))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (* 2 phi2)) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 3 binary64) phi2) phi1)))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (+ (* -1 (/ (+ (* 2 (pow phi2 2)) (pow phi2 2)) phi1)) (* 2 phi2))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (-.f64 (*.f64 phi2 #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) phi1))) phi1)))
(* -1 (* (pow phi1 3) (+ 1 (* -1 (/ (+ phi2 (+ (* -1 (/ (+ (* -1 (/ (pow phi2 3) phi1)) (+ (* 2 (pow phi2 2)) (pow phi2 2))) phi1)) (* 2 phi2))) phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 phi2 (-.f64 (*.f64 phi2 #s(literal 2 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)) (/.f64 (*.f64 phi2 (*.f64 phi2 phi2)) phi1)) phi1))) phi1)))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/2 (* phi1 (sin (* 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/2 binary64)) (*.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))))))))
(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 phi2 (*.f64 #s(literal 1 binary64) phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1))))
(cos (* 1/2 (- phi2 (* -1 phi1))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/2 (* phi2 (sin (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/2 binary64) phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* phi2 (- (* -1/8 (* phi2 (cos (* 1/2 phi1)))) (* 1/2 (sin (* 1/2 phi1))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 phi2 (+.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(literal -1/8 binary64) phi2) (cos.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 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/2 binary64)) (*.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))))))))
(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 (*.f64 #s(literal 1 binary64) phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2))))
(cos (* 1/2 (- phi1 (* -1 phi2))))
(cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2))))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(+ (* 1/2 phi1) (* 1/2 phi2))
(*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* phi1 (+ 1/2 (* 1/2 (/ phi2 phi1))))
(*.f64 phi1 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi2 phi1))))
(* 1/2 phi1)
(*.f64 #s(literal 1/2 binary64) phi1)
(* -1 (* phi1 (- (* -1/2 (/ phi2 phi1)) 1/2)))
(*.f64 (-.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 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(*.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* phi2 (+ 1/2 (* 1/2 (/ phi1 phi2))))
(*.f64 phi2 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 phi1 phi2))))
(* 1/2 phi2)
(*.f64 #s(literal 1/2 binary64) phi2)
(* -1 (* phi2 (- (* -1/2 (/ phi1 phi2)) 1/2)))
(-.f64 #s(literal 0 binary64) (*.f64 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 #s(literal 0 binary64) (*.f64 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 #s(literal 0 binary64) (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) phi1) phi2) #s(literal -1/2 binary64))))
phi2
(+ phi1 phi2)
(+.f64 phi1 phi2)
(+ phi1 phi2)
(+.f64 phi1 phi2)
(+ phi1 phi2)
(+.f64 phi1 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 (/ 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 phi1 phi2)
(+ phi1 phi2)
(+.f64 phi1 phi2)
(+ phi1 phi2)
(+.f64 phi1 phi2)
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)))
(* -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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* R (* lambda1 (cos (* 1/2 phi2))))) (* 1/2 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 lambda1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/8 (* R (* lambda1 (* phi1 (cos (* 1/2 phi2)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))))))
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi2))))) (* phi1 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi2))))) (* phi1 (+ (* -1/48 (* R (* lambda1 (* phi1 (sin (* 1/2 phi2)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi2))))))))))
(-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) R) (*.f64 (*.f64 lambda1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(* -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 (* 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 (* 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 (* 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 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1))))))
(* -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 (* R (* lambda1 (cos (* 1/2 phi1))))) (* 1/2 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))))
(-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) R) (*.f64 (*.f64 lambda1 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/8 (* R (* lambda1 (* phi2 (cos (* 1/2 phi1)))))) (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) R) (*.f64 (*.f64 lambda1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (* -1 (* R (* lambda1 (cos (* 1/2 phi1))))) (* phi2 (+ (* 1/2 (* R (* lambda1 (sin (* 1/2 phi1))))) (* phi2 (+ (* -1/48 (* R (* lambda1 (* phi2 (sin (* 1/2 phi1)))))) (* 1/8 (* R (* lambda1 (cos (* 1/2 phi1))))))))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 R lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal -1/48 binary64) R) (*.f64 (*.f64 lambda1 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 #s(literal 1/8 binary64) (*.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) phi1))))
(* -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 (* 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 (* 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 (* 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 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2))))))
(* -1 (* R (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 R lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2))))))
(* -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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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 (* 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)))))
(cos (* 1/2 phi1))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))
(+ (cos (* 1/2 phi1)) (* -1/8 (* (pow phi2 2) (cos (* 1/2 phi1)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi2 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* 1/384 (* (pow phi2 2) (cos (* 1/2 phi1)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 phi2 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))
(+ (cos (* 1/2 phi1)) (* (pow phi2 2) (+ (* -1/8 (cos (* 1/2 phi1))) (* (pow phi2 2) (+ (* -1/46080 (* (pow phi2 2) (cos (* 1/2 phi1)))) (* 1/384 (cos (* 1/2 phi1))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi2 phi2) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 phi2 phi2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) #s(literal 1/384 binary64)))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(cos (* 1/2 phi2))
(cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))
(+ (cos (* 1/2 phi2)) (* -1/8 (* (pow phi1 2) (cos (* 1/2 phi2)))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* 1/384 (* (pow phi1 2) (cos (* 1/2 phi2)))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/384 binary64) (*.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))
(+ (cos (* 1/2 phi2)) (* (pow phi1 2) (+ (* -1/8 (cos (* 1/2 phi2))) (* (pow phi1 2) (+ (* -1/46080 (* (pow phi1 2) (cos (* 1/2 phi2)))) (* 1/384 (cos (* 1/2 phi2))))))))
(+.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal -1/8 binary64)) (*.f64 (*.f64 phi1 phi1) (+.f64 (*.f64 (*.f64 #s(literal -1/46080 binary64) (*.f64 phi1 phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) #s(literal 1/384 binary64)))))))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(* (cos (* 1/2 phi1)) (cos (* 1/2 phi2)))
(*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(/ (pow phi2 2) (pow phi1 2))
(/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
phi1
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* phi1 (+ 1 (* -1 (/ phi2 phi1))))
(*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
phi1
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -1 (* phi1 (- (/ phi2 phi1) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
phi1
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(+ phi1 (* -1 phi2))
(-.f64 phi1 phi2)
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* phi2 (- (/ phi1 phi2) 1))
(*.f64 phi2 (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* -1 phi2)
(-.f64 #s(literal 0 binary64) phi2)
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* -1 (* phi2 (+ 1 (* -1 (/ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
phi2
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
(* phi2 (+ 1 (* -1 (/ phi1 phi2))))
(*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2)))
phi2
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
(* -1 (* phi2 (- (/ phi1 phi2) 1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64)))
phi2
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(+ phi2 (* -1 phi1))
(-.f64 phi2 phi1)
(* -1 phi1)
(-.f64 #s(literal 0 binary64) phi1)
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* phi1 (- (/ phi2 phi1) 1))
(*.f64 phi1 (+.f64 (/.f64 phi2 phi1) #s(literal -1 binary64)))
(* -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 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(* -1 (* phi1 (+ 1 (* -1 (/ phi2 phi1)))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(pow phi2 2)
(*.f64 phi2 phi2)
(+ (* -2 (* phi1 phi2)) (pow phi2 2))
(*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64))))
(+ (* phi1 (+ phi1 (* -2 phi2))) (pow phi2 2))
(+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi1 (*.f64 phi2 #s(literal -2 binary64)))))
(+ (* phi1 (+ phi1 (* -2 phi2))) (pow phi2 2))
(+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi1 (*.f64 phi2 #s(literal -2 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 phi2 2) (pow phi1 2)))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) phi1)) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))))
(* (pow phi1 2) (+ 1 (+ (* -2 (/ phi2 phi1)) (/ (pow phi2 2) (pow phi1 2)))))
(*.f64 (*.f64 phi1 phi1) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 #s(literal -2 binary64)) 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 (/ (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 phi2 phi2) phi1)) phi1)))
(* (pow phi1 2) (+ 1 (* -1 (/ (+ (* -1 (/ (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 phi2 phi2) phi1)) phi1)))
(pow phi1 2)
(*.f64 phi1 phi1)
(+ (* -2 (* phi1 phi2)) (pow phi1 2))
(+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2)))
(+ (* phi2 (+ phi2 (* -2 phi1))) (pow phi1 2))
(+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64)))))
(+ (* phi2 (+ phi2 (* -2 phi1))) (pow phi1 2))
(+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 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 phi1 2) (pow phi2 2)))))
(*.f64 (*.f64 phi2 phi2) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) phi2)) (/.f64 (*.f64 phi1 phi1) (*.f64 phi2 phi2))))
(* (pow phi2 2) (+ 1 (+ (* -2 (/ phi1 phi2)) (/ (pow phi1 2) (pow phi2 2)))))
(*.f64 (*.f64 phi2 phi2) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 #s(literal -2 binary64)) 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 (/ (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 phi1 phi1) phi2)) phi2)))
(* (pow phi2 2) (+ 1 (* -1 (/ (+ (* -1 (/ (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 phi1 phi1) phi2)) phi2)))
(* -1 (* lambda1 (cos (* 1/2 phi2))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* 1/2 (* lambda1 (* phi1 (sin (* 1/2 phi2))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/8 (* lambda1 (* phi1 (cos (* 1/2 phi2))))) (* 1/2 (* lambda1 (sin (* 1/2 phi2)))))))
(-.f64 (*.f64 phi1 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 lambda1 phi1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi2)))) (* phi1 (+ (* 1/2 (* lambda1 (sin (* 1/2 phi2)))) (* phi1 (+ (* -1/48 (* lambda1 (* phi1 (sin (* 1/2 phi2))))) (* 1/8 (* lambda1 (cos (* 1/2 phi2)))))))))
(-.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 phi1 (+.f64 (*.f64 (*.f64 (*.f64 lambda1 phi1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2))) #s(literal -1/48 binary64)) (*.f64 (*.f64 #s(literal 1/8 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) lambda1))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1)))))
(* -1 (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1)))))
(* -1 (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1)))))
(* -1 (* lambda1 (cos (* 1/2 (- phi2 (* -1 phi1))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi2 (*.f64 #s(literal 1 binary64) phi1)))))
(* -1 (* lambda1 (cos (* 1/2 phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(+ (* -1 (* lambda1 (cos (* 1/2 phi1)))) (* 1/2 (* lambda1 (* phi2 (sin (* 1/2 phi1))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 lambda1 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* 1/8 (* lambda1 (* phi2 (cos (* 1/2 phi1))))) (* 1/2 (* lambda1 (sin (* 1/2 phi1)))))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 lambda1 phi2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(+ (* -1 (* lambda1 (cos (* 1/2 phi1)))) (* phi2 (+ (* 1/2 (* lambda1 (sin (* 1/2 phi1)))) (* phi2 (+ (* -1/48 (* lambda1 (* phi2 (sin (* 1/2 phi1))))) (* 1/8 (* lambda1 (cos (* 1/2 phi1)))))))))
(-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) lambda1) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 phi2 (+.f64 (*.f64 #s(literal -1/48 binary64) (*.f64 (*.f64 lambda1 phi2) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (*.f64 (*.f64 #s(literal 1/8 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))))) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) lambda1))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (- phi1 (* -1 phi2))))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 (*.f64 #s(literal 1 binary64) phi2)))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 (* lambda1 (cos (* 1/2 (+ phi1 phi2)))))
(*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)
(* -1 lambda1)
(-.f64 #s(literal 0 binary64) lambda1)

eval203.0ms (1.1%)

Compiler

Compiled 41479 to 3932 computations (90.5% saved)

prune323.0ms (1.7%)

Pruning

75 alts after pruning (72 fresh and 3 done)

PrunedKeptTotal
New1232331265
Fresh173956
Picked415
Done022
Total1253751328
Accuracy
100.0%
Counts
1328 → 75
Alt Table
Click to see full alt table
StatusAccuracyProgram
11.7%
(/.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 (+.f64 phi1 phi2) #s(literal 2 binary64)))))) (*.f64 (*.f64 R lambda1) (*.f64 R lambda1)))) (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (*.f64 R lambda1)))
10.0%
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 R phi1))
11.6%
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
2.0%
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))) phi2)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
16.7%
(/.f64 (*.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) R) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))))
37.2%
(/.f64 (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) R) (+.f64 phi2 phi1))
3.8%
(/.f64 (*.f64 (*.f64 R (*.f64 R R)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))
38.6%
(/.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
40.4%
(/.f64 R (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)))
57.4%
(/.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
10.0%
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 R phi1) (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))))
34.0%
(-.f64 (*.f64 phi2 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) R) phi1) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) R) phi1)))) R))) (*.f64 R phi1))
57.3%
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) R))
10.0%
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (/.f64 #s(literal 1 binary64) (*.f64 R phi1)))
57.7%
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (*.f64 R (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
45.8%
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))) phi1)))
10.4%
(*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (*.f64 R #s(literal -5/4 binary64)) phi2)))
38.6%
(*.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
20.1%
(*.f64 (*.f64 R (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1))))) (neg.f64 lambda1))
19.9%
(*.f64 (*.f64 R (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 lambda1))
19.1%
(*.f64 (*.f64 R (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 lambda1))
10.8%
(*.f64 (*.f64 R (cos.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 phi2 phi1))) #s(literal -1 binary64))))) (neg.f64 lambda1))
22.0%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
23.9%
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
10.1%
(*.f64 (*.f64 R lambda1) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
11.1%
(*.f64 (neg.f64 (*.f64 R lambda2)) (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))))
10.7%
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
58.5%
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
56.4%
(*.f64 phi1 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 phi2 phi1))))
94.0%
(*.f64 R (hypot.f64 (/.f64 (-.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (sin.f64 (*.f64 phi1 #s(literal 1/2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
99.9%
(*.f64 R (hypot.f64 (/.f64 (*.f64 (+.f64 (neg.f64 (pow.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) #s(literal 3 binary64))) (pow.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) #s(literal 3 binary64))) (-.f64 lambda1 lambda2)) (+.f64 (pow.f64 (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))) #s(literal 2 binary64)) (*.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (neg.f64 (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64))))))))) (-.f64 phi1 phi2)))
92.9%
(*.f64 R (hypot.f64 (/.f64 (cos.f64 (/.f64 phi2 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 lambda1 lambda2))) (-.f64 phi1 phi2)))
99.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
92.9%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (-.f64 phi1 phi2)))
94.0%
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))) (-.f64 phi1 phi2)))
15.0%
(*.f64 R (/.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)))))))))
14.8%
(*.f64 R (/.f64 (/.f64 (*.f64 phi2 phi2) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
37.8%
(*.f64 R (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 phi2 phi1)))
32.6%
(*.f64 R (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
12.7%
(*.f64 R (/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1))
5.4%
(*.f64 R (/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) phi2) (/.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1))
37.1%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1))
42.7%
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 phi1 phi2)) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
10.1%
(*.f64 R (/.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) phi1))
10.3%
(*.f64 R (/.f64 (*.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
39.1%
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) phi2) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
36.3%
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (*.f64 phi2 phi2)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
19.3%
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) (/.f64 phi2 (*.f64 phi1 phi1))) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
23.9%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)))) (*.f64 phi1 (*.f64 phi1 phi1))))))
12.1%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))))))
7.4%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 phi2 (*.f64 phi2 phi2)))))
12.3%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
19.2%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
10.9%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
24.2%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
36.5%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) phi2)))
32.3%
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) phi1)))
36.6%
(*.f64 R (-.f64 (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))
30.9%
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) phi1))))) phi1))
63.5%
(*.f64 R (-.f64 phi2 phi1))
20.1%
(*.f64 R (*.f64 (fma.f64 (-.f64 #s(literal 0 binary64) (sin.f64 (*.f64 phi2 #s(literal 1/2 binary64)))) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 (cos.f64 (*.f64 phi2 #s(literal 1/2 binary64))) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))) (neg.f64 lambda1)))
17.0%
(*.f64 R (*.f64 (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
11.1%
(*.f64 R (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 #s(literal 0 binary64) lambda2)))
37.8%
(*.f64 R (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
17.8%
(*.f64 R (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (neg.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
10.7%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
20.3%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1)))
9.0%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) lambda1))
19.9%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1)))
19.1%
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
57.8%
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
32.3%
(*.f64 R (*.f64 phi1 (+.f64 (-.f64 (/.f64 phi2 phi1) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) #s(literal -1 binary64))))
36.5%
(*.f64 R phi2)
11.5%
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 phi2 phi2)) phi1))
32.4%
(neg.f64 (*.f64 R phi1))
Compiler

Compiled 4865 to 1749 computations (64% saved)

regimes387.0ms (2%)

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

9 calls:

51.0ms
(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
39.0ms
phi2
38.0ms
lambda2
35.0ms
(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
34.0ms
R
Results
AccuracySegmentsBranch
99.9%1R
99.9%1lambda1
99.9%1lambda2
99.9%1phi1
99.9%1phi2
99.9%1(*.f64 R (sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))))
99.9%1(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
99.9%1(+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2)))
99.9%1(-.f64 lambda1 lambda2)
Compiler

Compiled 144 to 79 computations (45.1% saved)

regimes450.0ms (2.4%)

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

9 calls:

58.0ms
R
57.0ms
phi1
53.0ms
(sqrt.f64 (+.f64 (*.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))))) (*.f64 (-.f64 phi1 phi2) (-.f64 phi1 phi2))))
49.0ms
(-.f64 lambda1 lambda2)
47.0ms
(*.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)))))
Results
AccuracySegmentsBranch
98.6%1R
98.6%1lambda1
98.6%1lambda2
98.6%1phi1
98.6%1phi2
98.6%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)))))
98.6%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))))
98.6%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)))
98.6%1(-.f64 lambda1 lambda2)
Compiler

Compiled 144 to 79 computations (45.1% saved)

regimes280.0ms (1.5%)

Counts
98 → 2
Calls
Call 1
Inputs
(*.f64 R phi2)
(neg.f64 (*.f64 R phi1))
(*.f64 R (-.f64 phi2 phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) phi1)))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) phi2)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 phi2 phi2)) phi1))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 R (/.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) phi1))
(*.f64 phi1 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 phi2 phi1))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 R (-.f64 (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))
(*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (*.f64 R (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) R))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(*.f64 R (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 phi2 phi1)))
(*.f64 R (/.f64 (/.f64 (*.f64 phi2 phi2) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) R) (+.f64 phi2 phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 R phi1))
(*.f64 R (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi2 (+.f64 (/.f64 #s(literal 1 binary64) phi2) (/.f64 #s(literal -1 binary64) phi1))))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1))
(*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (*.f64 R #s(literal -5/4 binary64)) phi2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (/.f64 #s(literal 1 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 R (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)))
(/.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 R (*.f64 phi1 (+.f64 (-.f64 (/.f64 phi2 phi1) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) #s(literal -1 binary64))))
(*.f64 R (/.f64 (*.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 phi2 (*.f64 phi2 phi2)))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) phi2) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))) phi1)))
(*.f64 R (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) phi1))))) phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (*.f64 phi2 phi2)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 phi1)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 phi1 phi2)) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (*.f64 R (*.f64 R R)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) R) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi2 (*.f64 phi2 phi2)))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))) (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 #s(literal 1 binary64) phi1))))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(-.f64 (*.f64 phi2 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) R) phi1) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) R) phi1)))) R))) (*.f64 R phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) (/.f64 phi2 (*.f64 phi1 phi1))) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) R) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (*.f64 (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)))) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (neg.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 (/.f64 R (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) R) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
(*.f64 R (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 R phi1) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
(*.f64 (/.f64 R (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) phi2) (/.f64 (*.f64 phi2 phi2) phi1)) phi1)))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))))
(*.f64 R (/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
(*.f64 R (/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) phi2) (/.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))) phi2)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1)))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1)))
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (neg.f64 (*.f64 R lambda1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
(*.f64 (*.f64 R (cos.f64 (/.f64 phi1 #s(literal 2 binary64)))) (neg.f64 lambda1))
(*.f64 (*.f64 R (cos.f64 (/.f64 phi2 #s(literal 2 binary64)))) (neg.f64 lambda1))
(*.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 R lambda1))
(*.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))) (neg.f64 lambda1)))
(*.f64 (neg.f64 (*.f64 R lambda2)) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))
(*.f64 (*.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 lambda1))
(*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) lambda2)))
(-.f64 #s(literal 0 binary64) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (*.f64 R lambda1)))
(*.f64 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:

55.0ms
phi1
53.0ms
phi2
45.0ms
(-.f64 lambda1 lambda2)
35.0ms
lambda1
30.0ms
lambda2
Results
AccuracySegmentsBranch
94.0%1R
94.0%1lambda1
96.4%2lambda2
98.6%2phi1
98.6%2phi2
94.0%1(-.f64 lambda1 lambda2)
Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes274.0ms (1.5%)

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

6 calls:

61.0ms
(-.f64 lambda1 lambda2)
47.0ms
phi2
43.0ms
lambda1
41.0ms
phi1
29.0ms
R
Results
AccuracySegmentsBranch
94.0%1R
94.0%1lambda1
94.0%1(-.f64 lambda1 lambda2)
94.0%1lambda2
94.0%1phi1
94.0%1phi2
Compiler

Compiled 38 to 31 computations (18.4% saved)

regimes221.0ms (1.2%)

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

5 calls:

37.0ms
lambda1
36.0ms
lambda2
28.0ms
R
27.0ms
phi2
25.0ms
phi1
Results
AccuracySegmentsBranch
63.5%1R
71.7%3lambda1
70.1%3lambda2
63.5%1phi1
63.5%1phi2
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes73.0ms (0.4%)

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

1 calls:

51.0ms
lambda1
Results
AccuracySegmentsBranch
71.7%3lambda1
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes61.0ms (0.3%)

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

1 calls:

26.0ms
lambda1
Results
AccuracySegmentsBranch
71.1%3lambda1
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes59.0ms (0.3%)

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

1 calls:

23.0ms
lambda1
Results
AccuracySegmentsBranch
70.7%3lambda1
Compiler

Compiled 6 to 5 computations (16.7% saved)

regimes84.0ms (0.4%)

Counts
82 → 2
Calls
Call 1
Inputs
(*.f64 R phi2)
(neg.f64 (*.f64 R phi1))
(*.f64 R (-.f64 phi2 phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) phi1)))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) phi2)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 phi2 phi2)) phi1))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 R (/.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) phi1))
(*.f64 phi1 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 phi2 phi1))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 R (-.f64 (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))
(*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (*.f64 R (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) R))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(*.f64 R (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 phi2 phi1)))
(*.f64 R (/.f64 (/.f64 (*.f64 phi2 phi2) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) R) (+.f64 phi2 phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 R phi1))
(*.f64 R (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi2 (+.f64 (/.f64 #s(literal 1 binary64) phi2) (/.f64 #s(literal -1 binary64) phi1))))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1))
(*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (*.f64 R #s(literal -5/4 binary64)) phi2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (/.f64 #s(literal 1 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 R (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)))
(/.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 R (*.f64 phi1 (+.f64 (-.f64 (/.f64 phi2 phi1) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) #s(literal -1 binary64))))
(*.f64 R (/.f64 (*.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 phi2 (*.f64 phi2 phi2)))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) phi2) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))) phi1)))
(*.f64 R (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) phi1))))) phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (*.f64 phi2 phi2)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 phi1)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 phi1 phi2)) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (*.f64 R (*.f64 R R)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) R) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi2 (*.f64 phi2 phi2)))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))) (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 #s(literal 1 binary64) phi1))))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(-.f64 (*.f64 phi2 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) R) phi1) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) R) phi1)))) R))) (*.f64 R phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) (/.f64 phi2 (*.f64 phi1 phi1))) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) R) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (*.f64 (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)))) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (neg.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 (/.f64 R (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) R) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
(*.f64 R (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 R phi1) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
(*.f64 (/.f64 R (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) phi2) (/.f64 (*.f64 phi2 phi2) phi1)) phi1)))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))))
(*.f64 R (/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
(*.f64 R (/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) phi2) (/.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))) phi2)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)))
Outputs
(*.f64 R (-.f64 phi2 phi1))
(*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))
Calls

2 calls:

29.0ms
lambda2
21.0ms
lambda1
Results
AccuracySegmentsBranch
68.0%2lambda2
66.1%2lambda1
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes65.0ms (0.3%)

Counts
80 → 1
Calls
Call 1
Inputs
(*.f64 R phi2)
(neg.f64 (*.f64 R phi1))
(*.f64 R (-.f64 phi2 phi1))
(-.f64 #s(literal 0 binary64) (*.f64 R phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) phi1)))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) phi2)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 R (*.f64 phi2 phi2)) phi1))
(*.f64 R (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi1 phi2))))
(*.f64 R (/.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) phi1))
(*.f64 phi1 (*.f64 R (+.f64 #s(literal -1 binary64) (/.f64 phi2 phi1))))
(*.f64 phi2 (-.f64 R (/.f64 (*.f64 R phi1) phi2)))
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(*.f64 R (-.f64 (*.f64 phi2 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))
(*.f64 (*.f64 R (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 (-.f64 #s(literal 0 binary64) phi2) (*.f64 R (+.f64 (/.f64 phi1 phi2) #s(literal -1 binary64))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (-.f64 #s(literal 0 binary64) phi1) R))
(-.f64 #s(literal 0 binary64) (*.f64 phi1 (-.f64 R (/.f64 (*.f64 R phi2) phi1))))
(*.f64 R (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 phi2 phi1)))
(*.f64 R (/.f64 (/.f64 (*.f64 phi2 phi2) phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) R) (+.f64 phi2 phi1))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (*.f64 R phi1))
(*.f64 R (*.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (/.f64 #s(literal 1 binary64) (+.f64 phi2 phi1))))
(*.f64 R (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi2 (+.f64 (/.f64 #s(literal 1 binary64) phi2) (/.f64 #s(literal -1 binary64) phi1))))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))) phi1))
(*.f64 (*.f64 phi2 phi2) (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 R phi1)) (/.f64 (*.f64 R #s(literal -5/4 binary64)) phi2)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 R (*.f64 phi1 (*.f64 R phi1)))) (/.f64 #s(literal 1 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 R (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)))
(/.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))
(*.f64 R (*.f64 phi1 (+.f64 (-.f64 (/.f64 phi2 phi1) (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) #s(literal -1 binary64))))
(*.f64 R (/.f64 (*.f64 phi1 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (*.f64 R (-.f64 (/.f64 (*.f64 phi2 phi2) phi1) phi1)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 phi2 (*.f64 phi2 phi2)))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) phi2) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 R (/.f64 (+.f64 (*.f64 R (*.f64 #s(literal 3 binary64) phi2)) (*.f64 #s(literal -2 binary64) (*.f64 R phi2))) phi1)))
(*.f64 R (/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 (/.f64 (*.f64 phi1 phi1) phi2))) phi1)) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (-.f64 (*.f64 phi2 (+.f64 #s(literal 1 binary64) (*.f64 phi2 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 phi2 (*.f64 phi1 phi1))) (/.f64 #s(literal 1 binary64) phi1))))) phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 phi1 phi1)) (*.f64 phi2 phi2)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 phi2 phi1)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2)))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 phi2 (/.f64 phi1 phi2)) phi1))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(/.f64 (*.f64 (*.f64 R (*.f64 R R)) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 phi1 phi1)))) (*.f64 R (*.f64 phi1 (*.f64 R phi1))))
(/.f64 (*.f64 (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))) R) (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi2 (*.f64 phi2 phi2)))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi2 phi2) (*.f64 phi1 (+.f64 phi2 phi1))) (-.f64 (*.f64 phi2 (*.f64 phi2 phi2)) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi2 phi2) (*.f64 (/.f64 #s(literal 1 binary64) phi1) (/.f64 #s(literal 1 binary64) phi1))))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(-.f64 (*.f64 phi2 (*.f64 #s(literal -1 binary64) (-.f64 (*.f64 phi2 (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) R) phi1) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) R) phi1)))) R))) (*.f64 R phi1))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 phi1 (-.f64 #s(literal 0 binary64) (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 (*.f64 phi1 (+.f64 (*.f64 (*.f64 (/.f64 phi2 (*.f64 phi1 phi1)) (/.f64 phi2 (*.f64 phi1 phi1))) (*.f64 phi1 phi1)) #s(literal -1 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) R) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))
(*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (*.f64 (/.f64 (-.f64 (*.f64 phi2 phi2) (*.f64 phi1 phi1)) (+.f64 (*.f64 phi1 (*.f64 phi1 phi1)) (*.f64 phi2 (*.f64 phi2 phi2)))) (+.f64 (*.f64 phi1 phi1) (*.f64 phi2 (-.f64 phi2 phi1)))))
(*.f64 R (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (/.f64 (/.f64 phi2 phi1) (/.f64 phi1 phi2))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 phi2 phi1) (+.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 phi1) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 phi2) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (-.f64 (*.f64 phi2 (+.f64 (*.f64 (*.f64 phi1 #s(literal -3 binary64)) phi2) (*.f64 (*.f64 phi1 phi1) #s(literal 3 binary64)))) (*.f64 phi1 (*.f64 phi1 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi2 (+.f64 phi2 (*.f64 phi1 #s(literal -2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (neg.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 phi1 phi1) (*.f64 #s(literal -2 binary64) (*.f64 phi1 phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi2))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 (/.f64 R (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))
(/.f64 (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) R) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (*.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))) (/.f64 #s(literal 1 binary64) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))
(*.f64 R (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (-.f64 #s(literal 0 binary64) phi1))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 (/.f64 R phi1) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)))))
(*.f64 (/.f64 R (/.f64 (/.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (-.f64 #s(literal 0 binary64) phi1))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (/.f64 (*.f64 phi1 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (*.f64 (*.f64 phi1 phi1) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) phi2) (/.f64 (*.f64 phi2 phi2) phi1)) phi1)))))))
(*.f64 R (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))) (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1)) (-.f64 #s(literal 0 binary64) phi1)) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))) (*.f64 phi1 (-.f64 #s(literal 1 binary64) (/.f64 phi2 phi1))))))))))
(*.f64 R (/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2)))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
(*.f64 R (/.f64 (+.f64 (*.f64 (*.f64 phi2 phi2) #s(literal -1/2 binary64)) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 phi1 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2)))) phi2) (/.f64 #s(literal 1/2 binary64) phi2))) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2)) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2))) phi2) (*.f64 #s(literal 1/4 binary64) phi2))))) phi1))
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 phi2 phi2))) (*.f64 phi1 (-.f64 (*.f64 phi1 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) phi1) (*.f64 #s(literal -1/2 binary64) (-.f64 (/.f64 R phi2) (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))) phi2)))) (*.f64 #s(literal -1/2 binary64) (-.f64 (*.f64 R (/.f64 (*.f64 phi2 #s(literal -3 binary64)) phi2)) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2))) phi2))))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 R (*.f64 #s(literal 3 binary64) (*.f64 phi2 phi2)))) phi2) (*.f64 #s(literal 1/4 binary64) (*.f64 R phi2)))))) phi1)
Outputs
(*.f64 R (-.f64 phi2 phi1))
Calls

2 calls:

39.0ms
lambda1
21.0ms
lambda2
Results
AccuracySegmentsBranch
63.5%1lambda1
63.5%1lambda2
Compiler

Compiled 12 to 10 computations (16.7% saved)

regimes8.0ms (0%)

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

5 calls:

2.0ms
R
2.0ms
phi2
2.0ms
lambda2
2.0ms
lambda1
2.0ms
phi1
Results
AccuracySegmentsBranch
40.4%3R
41.4%3lambda1
59.1%2phi2
59.6%2phi1
36.5%1lambda2
Compiler

Compiled 30 to 25 computations (16.7% saved)

regimes6.0ms (0%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

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

4 calls:

1.0ms
lambda1
1.0ms
phi1
1.0ms
phi2
1.0ms
R
Results
AccuracySegmentsBranch
36.5%1R
36.5%1lambda1
36.5%1phi2
36.5%1phi1
Compiler

Compiled 24 to 20 computations (16.7% saved)

bsearch18.0ms (0.1%)

Algorithm
binary-search
Stop Event
predicate-same
Steps
TimeLeftRight
15.0ms
1.6134830666843898e-28
8.521577302741109e-26
Results
7.0ms55×0valid
3.0ms1valid
Compiler

Compiled 205 to 136 computations (33.7% saved)

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

bsearch83.0ms (0.4%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
43.0ms
1.2309597298056396e-155
3.889412558887327e-151
33.0ms
-1.5937258809298872e+194
-2.4058274253813554e+190
Results
46.0ms88×1valid
21.0ms168×0valid
Compiler

Compiled 469 to 344 computations (26.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 51.0ms
ival-add: 21.0ms (41.2% of total)
ival-mult: 12.0ms (23.5% of total)
ival-cos: 6.0ms (11.8% of total)
ival-sub: 4.0ms (7.8% of total)
ival-div: 3.0ms (5.9% of total)
ival-sqrt: 3.0ms (5.9% of total)
backward-pass: 2.0ms (3.9% of total)
const: 0.0ms (0% of total)

bsearch68.0ms (0.4%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
24.0ms
1.2309597298056396e-155
3.889412558887327e-151
38.0ms
-1.5937258809298872e+194
-2.4058274253813554e+190
Results
28.0ms71×1valid
24.0ms185×0valid
Compiler

Compiled 469 to 344 computations (26.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-mult: 11.0ms (36% 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: 2.0ms (6.6% of total)
const: 0.0ms (0% of total)

bsearch128.0ms (0.7%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
35.0ms
1.2309597298056396e-155
3.889412558887327e-151
52.0ms
-1.5937258809298872e+194
-2.4058274253813554e+190
Results
45.0ms73×1valid
23.0ms183×0valid
Compiler

Compiled 453 to 336 computations (25.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 53.0ms
ival-div: 25.0ms (47.4% of total)
ival-mult: 10.0ms (19% of total)
ival-cos: 5.0ms (9.5% of total)
ival-sub: 4.0ms (7.6% of total)
ival-add: 3.0ms (5.7% of total)
ival-sqrt: 3.0ms (5.7% of total)
backward-pass: 2.0ms (3.8% of total)
const: 0.0ms (0% of total)

bsearch97.0ms (0.5%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
24.0ms
1.2309597298056396e-155
3.889412558887327e-151
33.0ms
-1.5937258809298872e+194
-2.4058274253813554e+190
Results
26.0ms83×1valid
21.0ms173×0valid
Compiler

Compiled 453 to 336 computations (25.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 32.0ms
ival-mult: 11.0ms (34.8% of total)
ival-cos: 5.0ms (15.8% of total)
ival-sub: 4.0ms (12.7% of total)
ival-add: 3.0ms (9.5% of total)
ival-div: 3.0ms (9.5% of total)
ival-sqrt: 3.0ms (9.5% of total)
backward-pass: 2.0ms (6.3% of total)
const: 0.0ms (0% of total)

bsearch30.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
26.0ms
2.1202717717192494e+179
5.296618513175913e+180
Results
14.0ms46×1valid
8.0ms66×0valid
Compiler

Compiled 220 to 157 computations (28.6% saved)

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

bsearch38.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
36.0ms
-5.542210083063101e-9
-1.664948897027252e-9
Results
29.0ms68×0valid
4.0ms12×1valid
Compiler

Compiled 140 to 99 computations (29.3% saved)

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

simplify18.0ms (0.1%)

Algorithm
egg-herbie
Rules
108×*-commutative_binary64
52×+-commutative_binary64
50×sub-neg_binary64
48×neg-sub0_binary64
48×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
078251
1133251
2197251
3256251
4284251
5294251
6295251
Stop Event
saturated
Calls
Call 1
Inputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 8711228593176025/174224571863520493293247799005065324265472 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 lambda1 #s(literal -16499999999999999978382112896300699106844226490067412667410479202782020749616396547048387174887307805052808432027589231178877555312467068399432214473394918237083378112987410836287124993675886592 binary64)) (*.f64 (*.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 lambda1)) (if (<=.f64 lambda1 #s(literal 6191657103222841/58968162887836583628774290327941701420576894069006881693378223441337877537377325813845730080900918242835443359855685076558915384842574884883772410178635875682021801984 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 lambda1 #s(literal -459999999999999985889781851930567506457473481467062663184924795830043415846244927588527915906070633079319791177294445170668484850428567878026470238985576488672918948276135606768447453239705600 binary64)) (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 lambda1 #s(literal -33999999999999999301182695453100428300599373527074635153851101049993594964723224864052550454319122855868194737442521585098343907749783663125594804525718206508932138057826604558164233881124864 binary64)) (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 lambda1 #s(literal -33000000000000000020080808569716158933177098361164505983814583775474272517232935453878463977046773605706615535733397979694758995685065807672813877729318146225858571932059472659225583657418752 binary64)) (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 lambda2 #s(literal 520000000000000041664345735241495959158360832625487628132469915218672441329611213276570013354929781052343876626131216126872874914636601090156530871532561582961727745894804774453248 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(*.f64 R (-.f64 phi2 phi1))
(if (<=.f64 phi1 #s(literal -1662273001970115/302231454903657293676544 binary64)) (neg.f64 (*.f64 R phi1)) (*.f64 R phi2))
(*.f64 R phi2)
Outputs
(*.f64 R (hypot.f64 (*.f64 (-.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2))) (*.f64 (sin.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (sin.f64 (*.f64 #s(literal 1/2 binary64) phi2)))) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(*.f64 R (hypot.f64 (*.f64 (-.f64 lambda1 lambda2) (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (-.f64 phi1 phi2)))
(if (<=.f64 phi2 #s(literal 8711228593176025/174224571863520493293247799005065324265472 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 8711228593176025/174224571863520493293247799005065324265472 binary64)) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2))) (*.f64 R (hypot.f64 (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 lambda1 lambda2)) (-.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 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 lambda1 lambda2)) (-.f64 phi1 phi2)))
(if (<=.f64 lambda1 #s(literal -16499999999999999978382112896300699106844226490067412667410479202782020749616396547048387174887307805052808432027589231178877555312467068399432214473394918237083378112987410836287124993675886592 binary64)) (*.f64 (*.f64 R (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64)))) (neg.f64 lambda1)) (if (<=.f64 lambda1 #s(literal 6191657103222841/58968162887836583628774290327941701420576894069006881693378223441337877537377325813845730080900918242835443359855685076558915384842574884883772410178635875682021801984 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 lambda1 #s(literal -16499999999999999978382112896300699106844226490067412667410479202782020749616396547048387174887307805052808432027589231178877555312467068399432214473394918237083378112987410836287124993675886592 binary64)) (*.f64 lambda1 (*.f64 (cos.f64 (/.f64 (+.f64 phi1 phi2) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) R))) (if (<=.f64 lambda1 #s(literal 6191657103222841/58968162887836583628774290327941701420576894069006881693378223441337877537377325813845730080900918242835443359855685076558915384842574884883772410178635875682021801984 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(if (<=.f64 lambda1 #s(literal -459999999999999985889781851930567506457473481467062663184924795830043415846244927588527915906070633079319791177294445170668484850428567878026470238985576488672918948276135606768447453239705600 binary64)) (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))) (neg.f64 lambda1))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 lambda1 #s(literal -459999999999999985889781851930567506457473481467062663184924795830043415846244927588527915906070633079319791177294445170668484850428567878026470238985576488672918948276135606768447453239705600 binary64)) (*.f64 R (*.f64 (-.f64 #s(literal 0 binary64) lambda1) (cos.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 phi1 phi2))))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(if (<=.f64 lambda1 #s(literal -33999999999999999301182695453100428300599373527074635153851101049993594964723224864052550454319122855868194737442521585098343907749783663125594804525718206508932138057826604558164233881124864 binary64)) (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (neg.f64 lambda1))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 lambda1 #s(literal -33999999999999999301182695453100428300599373527074635153851101049993594964723224864052550454319122855868194737442521585098343907749783663125594804525718206508932138057826604558164233881124864 binary64)) (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi2)) (-.f64 #s(literal 0 binary64) lambda1))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(if (<=.f64 lambda1 #s(literal -33000000000000000020080808569716158933177098361164505983814583775474272517232935453878463977046773605706615535733397979694758995685065807672813877729318146225858571932059472659225583657418752 binary64)) (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (neg.f64 lambda1))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)))))
(if (<=.f64 lambda1 #s(literal -33000000000000000020080808569716158933177098361164505983814583775474272517232935453878463977046773605706615535733397979694758995685065807672813877729318146225858571932059472659225583657418752 binary64)) (*.f64 R (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (-.f64 #s(literal 0 binary64) lambda1))) (if (<=.f64 lambda1 #s(literal 5601975474344475/14742040721959145907193572581985425355144223517251720423344555860334469384344331453461432520225229560708860839963921269139728846210643721220943102544658968920505450496 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2))))
(if (<=.f64 lambda2 #s(literal 520000000000000041664345735241495959158360832625487628132469915218672441329611213276570013354929781052343876626131216126872874914636601090156530871532561582961727745894804774453248 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (*.f64 R lambda2) (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1))))
(if (<=.f64 lambda2 #s(literal 520000000000000041664345735241495959158360832625487628132469915218672441329611213276570013354929781052343876626131216126872874914636601090156530871532561582961727745894804774453248 binary64)) (*.f64 R (-.f64 phi2 phi1)) (*.f64 (cos.f64 (*.f64 #s(literal 1/2 binary64) phi1)) (*.f64 R lambda2)))
(*.f64 R (-.f64 phi2 phi1))
(if (<=.f64 phi1 #s(literal -1662273001970115/302231454903657293676544 binary64)) (neg.f64 (*.f64 R phi1)) (*.f64 R phi2))
(if (<=.f64 phi1 #s(literal -1662273001970115/302231454903657293676544 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 R phi1)) (*.f64 R phi2))
(*.f64 R phi2)

soundness3.3s (17.3%)

Rules
7318×*-lowering-*.f32
7318×*-lowering-*.f64
6574×*-lowering-*.f32
6574×*-lowering-*.f64
6410×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
07456936
126155722
084985722
034137
1197134
21666134
08395134
01749
19049
277749
0846749
059375
1338325
23242257
08217257
01716
13616
28716
332216
4152816
5510616
0810316
0101710200
135579146
080839146
0157517142
1577315245
0803915245
053386
1316260
23128260
08491260
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 1342 to 836 computations (37.7% saved)

preprocess141.0ms (0.7%)

Remove

(sort phi1 phi2)

(sort lambda1 lambda2)

(negabs R)

Compiler

Compiled 1208 to 554 computations (54.1% saved)

end0.0ms (0%)

Profiling

Loading profile data...